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[!?.  ABSTRACT  j 

This  document  describes  LCC,  a  Language  for  Conversational  Computing  which  runs 
under  TSS  on  an  IBM  360/67.  The  statement  syntax  of  LCC  stems  from  that  of  Algol 
60  and  JOSS,  but  LCC  has  been  designed  to  exploit  as  fully  as  possible  the  dynamic 
nature  of  conversational  computing.  Thus  LCC  is  a  fully  interpretive  system 
with  extensive  features  for  conversational  control  and  with  capabilities  for 
atf  dynamic  block  structure,  block  expressions,  and  recursion,  b)  interspersed 
editing  and  execution  (use  of  program  text  as  data  and  vice  versa),  c¥  dynamic 
variable  attributes,  and  d)  interlaced  program  execution  and  creation  (program- 
directed  program  preparation).  The  complete  LCC  syntax  and  a  sample  conversation 
are  included. 
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THE  PURPOSE  OF  THE  EFFORT  WAS  TO  STUDY  AND  CREATE  A 
CONVERSATIONAL  LANGUAGE.  TIME  SHARING  IS  NOW  ACCEPTED  AS  AN 
EXCELLENT  WAY  TO  PROVIDE  COMPUTER  RESOURCES  FOR  PROBLEM 
SOLVING.  YET,  WITH  FEW  EXCEPTIONS,  THE  LANGUAGES  IN  WHICH 
PROGRAMS  MUST  BE  COUCHED  WERE  DESIGNED  FOR  BATCH  PROCESSING 
ENVIRONMENTS.  IF  ONE  IS  TO  INPUT  PROGRAMS  FROM  A  TERMINAL 
AND  THE  OUTPUT  (OR  SOME  PART  OF  IT  AT  LEAST)  IS  TO  RETURN  TO 
THE  TERMINAL,  IT  IS  NATURAL  TO  CORRECT  (EDIT)  PROGRAMS  FROM 
THE  TERMINAL. 

WHAT  THEN  ARE  THE  CONSEQUENCES  OF  PROGRAM  CREATION  AT 
THE  TERMINAL?  CERTAINLY  INTERSPERSING  EDITING  AND  EXECUTION 
SHOULD  BE  ENCOURAGED.  IF  THE  PROBLEMS  TO  BE  PROGRAMMED  ARE 
♦SMALL*  —  SO  RESPONSE  WILL  BE  GOOD  —  THEN  THE  PROGRAMS 
SHOULD  BE  RUN  I NTERPRET I VELY,  ESPECIALLY  IF  FREQUENT 
MODIFICATION  IS  TO  BE  EXPECTED.  THUS  THE  COMBINATION  OF 
SMALL  PROGRAMS  AND  FREQUENT  MODIFICATION  LEADS  TO  AN 
INTERPRETIVE  PROCESSOR. 

WHAT  ARE  THE  CONSEQUENCES  OF  INTERPRETATION?  THE 
REJECTION  OF  THE  COMPILER  APPROACH  SURELY  MUST  HAVE  SOME 
IMPORTANT  EFFECTS  ON  THE  LANGUAGE  BEING  PROCESSED.  ONE 
EFFECT  TO  BE  DESIRED  IS  AN  INCREASED  ABILITY  TO  INTERLACE 
EXECUTION  AND  CREATION.  ALGORITHMS  DO  NOT  SPRING  INTACT 
FROM  ThE  MIND  BUT  EVOLVE  —  BOTH  OVER  THE  SHORT  TERM  AND  THE 
LONG  TERM.  MUCH  OF  THE  DEVELOPMENT  OF  A  PROGRAM  SPRINGS 
FROM  EXPERIENCE  —  THE  ACTUAL  BEHAVIOR  OF  THE  PROGRAM  UNDER 
EXECUTION. 

ONE  IS  STRUCK  KITH  THE  POSSIBILITY  OF  EXECUTING 
INCOMPLETE  ALGORITHMS  AND  LETTING  THE  FLOW  OF  COMPUTATION  ON 
DATA  SAMPLES  AID  IN  THE  SEQUENCING  OF  PROGRAM  PREPARATION. 
IT  IS  TRUE  THAT  PROGRAMS  ARE  DECOMPOSED  INTO  PARTS  OR 
MODULES  FOR  A  VARIETY  OF  REASONS:  LOGICAL  DECOMPOSITION  OF 
A  TASK  INTO  ITS  SEPARATE  PARTS;  DECOMPOSITION  IMPOSED  BY  THE 
LIMITS  OF  HUMAN  ATTENTION  (NOT  EVERYTHING  CAN  BE  PROGRAMMED 
AT  ONCE);  DECOMPOSITION  IMPOSED  BY  THE  UNEVEN  UNDERSTANDING 
OF  THE  MECHANICS  OF  MODULES  EVEN  WHEN  THEIR  LOGICAL  FUNCTION 
IS  UNDERSTOOD  (PROGRAMMERS  TEND  TO  DO  FIRST  WHAT  THEY  KNOW 
HOW  TO  DO  BEST).  WHAT  IS  MORE  NATURAL  THAN  HAVING  THE 
COMPUTER,  THROUGH  THE  PROCESSOR  IN  WHOSE  LANGUAGE  ONE  IS 
WRITING,  ASSIST  IN  THE  SCHEDULING  OF  THE  TASKS? 

IT  IS  NOT  ONLY  THE  PRESENCE  OF  THE  PROGRAMMER  IN  THE 
LOOP  BUT  THE  WHOLE  STYLE  OF  PROGRAM  PREPARATION  THAT  CAUSES 
THIS  KIND  OF  PROGRAMMING  TO  BE  CALLED  CONVERSATIONAL.  ONE 
MUST  NOT  CLAIM  TOO  MUCH.  THE  PROCESSOR  IS  A  WEAK  ALLY  IN 
THE  PROCESS  OF  CREATION  AND  THE  BURDEN  OF  PROGRAMMING  IS 
STILL  IN  THE  PROGRAMMER’S  HANDS.  LET  US  SAY  THAT  A  MORE 
WILLING  ASSISTANT  IS  BEING  FASHIONED  THAN  WAS  EVER  PRESENT 
IN  THE  OLD  STYLE  COMPILER-DOMINATED  ENVIRONMENT. 
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“  “the  approach  used  for  the  design  and  construction  of 

THE  LANGUAGE  FOR  CONVERSATIONAL  COMPUTING  WAS  QUITE 
SIMPLE.  THE  COMPUTER  ON  WHICH  L££  WAS  TO  BE  FASHIONED  — 
THE  lgt3  3 SO/ 6 7  —  HAD  AN  AMBIT IOUS“TI ME  SHARING  SYSTEM  UNDER 
DEVELOPMENT  — TSS—  AND  IT  SEEMED  REASONABLE  TO  UTILIZE  THAT 
SYSTEM  AS  THE“DRDERLYING  TIME  SHARING  SYSTEM  SUPPORTING  OUR 
CONVERSATIONAL  LANGUAGE  AND  ITS  SYSTEM.  THE  ONLY  AVAILABLE 
TOOL  FOR  CONSTRUCTING  THE  LC£  SYSTEM  WAS  THE  TS§  ASSEMBLER 
AND  IT  WAS  IN  THAT  LANGUAGE  THAT  THE  SYSTEM  WAS  BUILT.  IT 
WAS  BELIEVED  —  AND  STILL  IS  —  THAT  THE  USE  OF  ANY 
PROGRAMMING  LANGUAGE  LEADS  TO  THE  DEVELOPMENT  OF  A  STYLE  OF 
PROGRAMMING  AND  THAT  EACH  LANGUAGE  HAS  A  ‘CONVERSATIONAL 
ANALOGUE*.  THE  DESIGNERS  OF  t,C£  HAD  THE  GREATEST  AFFINITY 
FOR  THE  SYNTAX  AND  STYLE  OF  6£  AND  SO  IT  WAS  CHOSEN  AS 

THE  BASE  FROM  WHICH  TO  DEVELOP  A  CONVERSATIONAL  ANALOGUE. 
MANY  OF  THE  CONSTRUCTIONS  WERE  BORROWED  FROM  £0§£,  THOUGH 
J.££  ATTAINS  A  POWER  FAR  BEYOND  THAT  OF  ££§§.  IN  RETROSPECT 
IT  PROBABLY  WOULD  HAVE  BEEN  BETTER  TO  HAVE  CHOSEN  IVERSON*S 
API,  AS  THE  BASE  SINCE  THE  ARRAY  PROCESSING  OF  A££  IS  SO  MUCH 
iffiRE  NATURAL  THAN  THE  ^£OL  SCALAR  PROCESSING. 
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WHEN  THE  SYSTEM  WAS  FIRST  BEING  USED.  J.  NEWCOMER  HAS 
PREPARED  A  OOSSIER  OF  SYSTEM  ROUTINES  AND  INTERNAL  DATA 
STRUCTURES  NECESSARY  FOR  ANY  REAL  UNDERSTANDING  OF  THE 
INTERNAL  MECHANICS  OF  THE  SYSTEM. 

THE  USER’S  MANUALS  (ISSUED  UNDER  SEPARATE  COVER)  WERE 
WRITTEN  BY  A.  LANKFORD  (VOLUME  I  AND  VOLUME  II)  AND  W. 
MULLINS  (VOLUME  I).  THE  EXAMPLES  AT  THE  END  OF  VOLUME  II 
WERE  WRITTEN  BY:  d.  MITCHELL  —  ‘TREE  DISPLAY  PROGRAM’; 

DIANA  BUTRICK  —  ‘SIMULA/LCC’;  A.  LANKFORD  —  ‘ALGEBRAIC 
EQUATION  SOLVER’;  D.  WILE  —  ‘AN  INFORMATION  RETRIEVAL 
SYSTEM*.  THESE  PROGRAMS  WERE  ALL  EDITED  BY  A.  LANKFORD  TO 
IMPROVE  THEIR  READABILITY. 

THE  LANGUAGE  DEFINITION  DOCUMENT  WHICH  FOLLOWS  WAS 
PREPARED  BY  H.  VAN  ZOEREN. 
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Introduct ion 


LCC  is  a  language  for  conversational  computing  which  operates 
within  the  TSS  monitor  system  on  the  IBM  360/67  computer  at 
Carnegie-Mellon  University.  Tn  its  fundamental  design,  LCC  began 
as  an  amalgamation  of  (1)  the  basic  elements  and  statements  of  the 
algorithmic  language  ALGOL  60  and  (2)  the  input-output.,  control, 
editing,  and  filing  statements  of  the  conversational  language 
JOSS,  but  extensive  modifications  have  been  made  to  exploit,  as 
fully  as  possible  the  dynamic  nature  of  conversational  computing. 
The  resulting  language,  with  its  underlying  processing  system, 
gives  you,  the  LCC  user,  a  very  high  degree  of  power  and 
flexibility. 

The  working  sentences  of  the  LCC  language  are  statements,  a 
statement  (abbreviated  s)  being  a  command  which  causes  LCC  to 
perform  an  action  (e.g.,  a  modification  of  data,  an  input/output 
operation,  a  modification  of  control).  You  may  type  an  arbitrary 
number  of  statements,  separated  from  one  another  by  semicolons 
(;),  on  a  single  line.  Such  a  statement  list  is  called  a  step,  and 
LCC  will  execute  the  statements  within  it  from  left  to  right. 

Steps  in  LCC  may  be  used  in  two  different  ways,  either  delayed 
or  Immediate.  Delayed  steps  are  translated  and  saved  by  LCC,  and 
they  may  later  be  recalled  and  executed  under  programmer  control. 
A  delayed  step  is  distinguished  by  the  presence  of  a  preceding 
decimal  step  number  which  indicates  its  relationship  to  other 
steps.  A  step  number  must  lie  between  0001.0001  and  9999.9999,  and 
it  is  separated  from  the  step  text  by  either  a  colon  (:)  or  a 
comma  (,).  Both  its  integer  portion,  from  which  leading  zeros  may 
be  omitted,  and  its  fractional  portion,  from  which  trailing  zeros 
may  be  omitted,  must  lie  between  0001  and  9999.  A  step  number 
serves  both  as  the  editing  designator  for  a  step  and  as  a  control 
designator  for  the  first  statement  in  the  step.  In  addition  to  the 
step  number,  any  statement  in  a  delayed  step  may  have  one  or  more 
labels  associated  with  it  as  control  designators,  a  label  being  an 
identifier  which  immediately  precedes  the  statement  and  is 
separated  from  it  by  a  colon  (:>.  If  a  step  has  multiple  step 
numbers,  all  must  precede  its  first  statement  or  label,  and  only 
the  ciqht.most  number  will  be  used;  if  a  statement  has  multiple 
labels,  each  will  be  significant.  Some  examples  of  delayed  steps 
are; 

3.7,  GO  TO  3.5; 

3125.0042:  A  -  B  +  1;  LB06 :  C  -  D*E;  LBL:  F  -  (S/3 

27.85:  27.830,  L:  H:  TYPF  Y,Z;  RETURN  T 

Delayed  st^ps  will  be  ordered  according  to  their  numbers,  and 
they  may  be  inserted,  modified,  or  deleted  freely  while 
conversing.  They  may  he  typed  in  any  order,  and  a  newly  typed  step 
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will  replace  any  previously  saved  step  with  the  sane  number.  For 
execution  purposes,  steps  are  grouped  into  parts,  with  a  part 
being  the  orderei  set  of  all  steps  whose  numbers  have  the  same 
integer  portion.  When  executed,  a  part  will  be  treated  as  an  ALGOL 
block,  i.e.,  variables  which  are  declared  and  labels  which  are 
used  in  it  will  have  local  moaninqs  which  are  valid  only  when  it 
is  active  (i.e.,  it  is  being  executed).  All  such  local  meanings 
will  he  erased  when  execution  of  the  part  is  completed. 

In  immediate  step,  which  is  distinguished  by  the  absence  of  a 
step  number,  is  translated  and  executed  when  typed  and  is  then 
discarded.  Immediate  steps  are  used  to  perform  one-time  or  '‘desk 
calculator*  calculations,  to  control  the  execution  of  the  delayed 
steps  of  a  program,  and  to  perform  various  editing  and  debugging 
operations.  An  explicit  transfer  of  control  (GOTO)  to  an  immediate 
statement  is  not  allowed,  and  consequently  immediate  statements 
cannot  be  labelled. 

Syntactically,  any  LCC  statement  may  be  used  in  either  an 
immediate  or  a  delayed  step.  When  executed,  however,  each 
statement  will  be  checked  for  validity  in  the  currently  existing 
context,  and  at  *:bat  time,  some  statements  will  be  treated  as 
no-ops  (e.g.,  an  immediate  'PAUSE',  a  delayed  'GO'),  and  some  will 
leac  to  errors  (e.g.,  a  global  'GOTO',  a  global  'RETURN'). 

An  LCC  statement  may  be  empty,  in  which  case  it  contains  no 
non-blank  characters  and  it  performs  no  action.  The  various 
non-empty  LCC  statements  are  listed  alphabetically  by  their 
initial  keywords  or  metavariables  and  described  below.  Following 
the  statement  descriptions  are  descriptions  of  the  subsidiary 
metavariables  (expressions,  literal  constants,  etc.)  used  in  the 
language.  The  abbreviated  syntax  notation  which  has  been  used  is 
described  in  Appendix  A,  and  the  complete  syntax  for  LCC  is 
summarized  in  Appendix  n. 
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statement 


(one  of  the  following  —  pp.  3-29) 


ALTER  qroup  |  :  j  e_1  ■*e2,e3*e4,  ...  ,  e„(2*N-1)  •*  e_(2*N) 

1,1 


The  expressions  e_I  should  evaluate  to  character  strings.  LCC 
will  search  the  text  of  the  group  for  substrings  which  match  the 
given  pattern  strings  e_1,  e_3,  ...  ,  e_(2*N-1).  Each  substring 
which  matches  an  e_(2+J-1)  will  be  replaced  by  the  corresponding 
e_(2*J),  and  the  group  will  be  retranslated  with  its  altered  text. 

LCC  will  perform  the  search  as  in  the  following  pst  •do-LCC 
code: 

FOR  (each  step  in  the  group  (ordered  on  step  numbers))  DO 
{  FOR  I  FROM  1  BY  2  TO  2*N-1  DO 
{  START_OF_SEARCH_POI NTER  -  1; 

AGAIN s  IF  (search  finds  substring  e_I)  THEN 
{  (replace  substring  oy  e_(I+1)); 

START_0F_5EARCH_ POINTER  -  (position  of 
1st  char  after  replaced  substring); 

GO  TO  AGAIN  }  > 

IF  (any  replacements  were  made)  THEN  (retranslate)  }; 

For  the  search  LCC  will  treat  both  text  and  pattern  strings  as 
sequences  of  either  contiguous  letters  and/or  digits  or  individual 
non-blank,  non-alphanumeric  characters,  with  blanks  being  ignored 
except  insofar  as  they  separate  alphanumeric  sequences  from  one 
another.  As  an  example,  the  step 

4.8:  X-IF  PQR  THEN  (TEHP+1)  ELSE  '15.64  FFr  ? GO  TO  4.41; 
will  be  found  to  contain  the  substrings  (among  others) 

'X-',  '(TEMP',  '+',  '15',  VFF',  'GO  T0r, 

'41;  ',  and  '.'  (twice) 

but  it  will  not  contain  the  substrings 

'8',  'O',  '.6',  'GOTO',  or  *T04' 


Examples: 

ALTER  STEP  1.6  :  'X'  -  'AX'  ,  'Y'  -  'BY' 
ALTER  PARTS,  'P  *  Q'  -  R 
ALTER  4.77  ,  'A'  -  '' 
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AR"AY  h  f-  ident  H  .,.  [  H  e  <  s  e  >  H  .  |  H  | .  1  H  .,. 

I  ,  ! 


LCC  will  assiqn  to  each  ident  in  a  list  the  multidimensional 
array  structure  specified  by  the  bounds  list  which  immediately 
follows  it.  Each  item  in  a  bounds  list  gives  the  limits  on  one 
subscript  of  an  array  structure.  The  number  of  items  is  thus  the 
number  of  dimensions  of  the  array.  An  item  in  a  bounds  list  can  be 
either  a  pair  of  expressions  specifying  the  lower  and  upper  limits 
on  the  subscript  for  that  dimension  or  a  single  expression 
specifying  the  upper  limit  on  that  subscript  (the  lower  limit  will 
be  implicitly  1). 

Storaqe  will  not  be  allocated  for  an  array  until  the  array  is 
used,  and  even  then  it  will  only  be  allocated  for  a  given  row  when 
an  element  from  that  row  is  first  accessed. 

Examples: 

ARRAY  L Af  1 :  N,  -  3s  3*Kl 

ARRAY  JIM,  JOE[10, 15,20),  DAVE [0 :8)[ 41 [-6 : -11 


BEGIN  h  s  H  .;.  END 


The  Keywords  4  BEGIN*  and  'END'  delimit  a  "block',  whose  list 
of  arbitrary  LCC  statements  will  be  treated  as  if  it  were  in  a 
part,  i.e. ,  there  may  be  local  variables  valid  only  within  it.  LCC 
will  perform  a  block  entry,  after  which  it  will  execute  the 
statements  from  the  list,  in  sequence.  This  "block  statement'  will 
normally  be  terminated  by  "running  off  its  end'.  A  RETURN 
statement  within  it  will  first  terminate  the  context  of  the  block 
statement  and  then  return  from  the  context  in  which  the  block  was 
embedded. 

Examples: 

BEGIN  STEP  4.8;  PART  251;  S  —  T  END 
BFGTN  NEW  A ,B;  PART  6;  PART  8  END 


CASE  e  OF  f  s_1  ;  s_2  ;  ...  ;  S_N  \ 


The  expression  e  wi.ll  be  evaluated  and  rounded  to  an  integer 
J.  If  1  <  J  <  N,  LCC  will  give  control  to  statement  s_J,  from 
which  control  will  normally  pass  to  the  successor  of  the  CASE 
statement.  It  is  an  error  if  J  is  out  of  the  range  1  to  N» 
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Examples: 

CASE  J+1  OP  {  X  *  F(A,B>  ♦  C  ; 

X  -  SORT(Y)  ♦  D  ; 
GO  TO  6.2  j 
• 

X  »  STS ( Y ♦ 2 >  ; 

GO  TO  6.2  ; 

X  -  0  > 


CASE  e  OF  C  s_1  ;  s.  2  ;  ...  ;  s_N  ,-  OTHERWISE  s_(N  +  1)  > 


The  expression  e  will  be  evaluated  and  rounded  to  an  integer 
J.  If  1  <  J  'S  N,  action  is  as  in  the  simple  CASE  statement  without 
an  OTHERWISE.  If  J  is  out  of  the  range  1  to  N ,  control  will  be 
given  to  statement  s_(N*1). 

Examples: 

CASE  I  OP  {  X-5;  OTHERWISE  X  -  B+5  ) 


COMBINE  <  STEP:.  >  num_1  TO  num_2  AS  e 


A  single  string  will  be  constructed  by  concatenating,  in  step 
number  order,  the  text  portions  of  all  steps  with  numbers  between 
num_1  and  num_2  inclusive.  Our<ng  this  concatenation  process,  a 
semicolon  (;)  character  will  be  appended  to  any  step  which  does 
not  already  terminate  with  one.  LCC  will  then  retranslate  the  new 
string  as  step  e.  Steps  num_1  to  num_2  will  net  be  deleted  and 
will  he  unaffected  by  the  COMBINE  statement  (unless  num_1  <  e  < 
num_2).  As  in  a  group,  it  is  an  error  if  num_1  >  num_2  (unless 
num_2  <  1). 

Examples: 

COMBINE  STEPS  6.7  TO  6.83  AS  6.7 


COPT  group  AS  e 


If  e  evaluates  to  an  integer,  the  set  of  steps  from  the 
specified  group  will  be  copied  and  retranslated  as  a  new  group, 
with  the  integer  portion  of  each  step  number  being  replaced  by  the 
value  of  e  (which  must  not  be  zero).  If  e  does  not  evaluate  to  an 
integer,  this  statement  is  equivalent  to  the  statement 


COPT  group  AS  e  BY  .01 
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All  steos  in  the  original  group  must  he  in  the  same  part.  The 
source  text  for  the  group  wiil  not  be  modified  by  the  COPY,  and 
the  oriqinal  group  will  not  be  deleted. 

Examples: 

COPY  PART  3  AS  41 
COPY  STEP  5.61  AS  12.074 


COPY  group  AS  e_1  BY  e_2 


LCC  will  copy,  renumber,  and  retranslate  the  ordered  set  of 
steps  from  the  specified  group.  The  renumbering  will  start  with 
e_1  (or,  if  e_1  is  an  integer,  with  (e_1  ♦  e_2))  and  successive 
step  numbers  will  be  incremented  by  e_2  (whose  value  must  lie 
between  .0001  and  .<19991.  The  original  group  of  steps  will  not  be 
deleted  by  a  COPY  statement  (though  it  may  be  changed  if  some  of 
the  new  steps  fall  within  the  group).  The  source  text  for  a  copied 
step  will  not  be  modified  during  the  COPY,  and  it  is  your 
responsibility  to  make  sure  that  the  renumbered  steps  do  not 
contain  spurious  references  to  steps  in  the  original  group.  To 
insure  this,  you  should  use  labels  rather  than  step  numbers  to 
refer  from  one  statement  in  the  group  to  another. 

Examples: 

COPY  STEPS  14.371  TO  14.4305  AS  814.001  BY  .002 


DELETE  PILE  e 


The  expression  e  must  evaluate  to  a  string,  which  wiil  be  used 
as  a  file  name.  LCC  will  delete  that  file  from  your  file  catalog, 
and  it  will  take  back  any  storage  which  that  file  used. 

Fxamples: 

DELETE  FILE  'AB' 


DELETE  ALL 


This  statement  is  effectively  equivalent  to  (but  slightly 
slower  than)  the  step 

EXIT  ALL?  DPLFTE  STEPS?  DELETE  VALUES 

Your  working  storage  will  be  completely  erased,-  and  LCC  will  be 
re- in itialited,  just  as  if  you  had  logged  off  and  then  logqed  back 
on. 
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DELETE  |  PUPTS  | 
|  STEPS  | 


,CC  -ill  eras,  fro.  wortin,  .t«.f .  and  oMect 

codes  for  all  steps  (only  values  will  reaain). 


delete  values 


_ erase  from  working  storage 

inca^tion-Ulue  «cb  of  ,o»r 

identifier  in  your  program  the  meaning 


the  current 
giving  every 


DELETE  <  STEPS  >  num_1  TO  nua_2 


LCC  will  erase  from  working  storage 
lie  between  num.1  and  no.  2  inclusive, 
error  if  «oO  >  nu..2  (unless  nu._2  <  1>- 


all  steps  whose  numbers 
As  in  a  group,  it  is  an 


Examples: 


DELETE  151.42  TO  151.536 


DELETE  <  STEP  >  num 


Equivalent  to 

DELETE  STEPS  num  TO  num 


Examples: 


DELETE  STEP  4.231 


DELETE  PARTS  num.1  TO  nuo_2 
Equivalent  to 

DELETE  STEPS  (nun.1  *  .0001)  TO  <nu._2  ♦  •«”> 
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D  ELETE  PART  nun 


Equivalent  to 

DELFTS  PARTS  nun  TO  nun 


DELETE  I  <  STEPS  >  |  I-  num_1  <  TO  num_2  >  -I  .,. 
|  PARTS  | 


A  DELETE  statement  nay  include  a  group  list.  LCC  will  then 
delete  all  steps  in  each  of  the  specified  groups. 

Examples: 

DELETE  PARTS  4,  7  TO  10,  153,  48 
DELETE  3.71,  3.814,  A4  TO  (A4  ♦  P  -  .5) 


DELETE  t-  varid  -I 


I.cc  will  replace  the  current  incarnation- value  for  each  varid 
ir.  the  list  by  •undefined*.  Tf  a  varid  referred  to  a  string  or 
array  (or  any  other  item  for  which  storage  was  allocated),  the 
internal  links  to  that  storage  will  be  cut,  but  the  storaqe  will 
not  be  taken  hack  until  the  block  within  which  it  was  allocated 
has  been  terminated. 

Note  that  an  array  element,  can  be  deleted.  This  feature  will 
be  necessary  before  you  can  change  the  meaning  of  an  array  element 
which  is  a  procedure,  a  reference  pointer,  or  an  array  name. 

Examples: 

DELETE  A, 8 
OELETE  CII,J,41 


DISPLAY  PILE  <  CATALOG  > 


LCC  will  type  out  a  list  of  the  names  of  all  of  your  LCC 
files.  The  names  will  be  the  full  TSS  naies  of  your  files,  which 
are  qualified  Dy  your  user  nurber  and  the  internal  name  LCCFILE. 
Thus  the  file  'SAVAl'  of  user  XYZ1ZZ13  will  have  the  full  name 


XYZ1ZZ13.  LCCFILE. SAVAL 
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DISPLAY  RETORN  <  STEPS  > 


LCC  will  type  out  a  list  of  the  currently  active  steps,  thus 
giving  a  nap  of  the  present  control  status.  Step  desicnators  will 
be  typed  one  per  line,  and  the  list  will  be  ordered  so  that  the 
innermost  (most  recent)  step  will  be  typed  first.  For  steps  inside 
parts,  LCC  will  type  the  step  number;  for  immediate  steps  LCC  will 
type  the  characters  '**+';  for  a  procedure  call  LCC  will  type  the 
procedure  name.  Thus  LCC  miqht  type  the  lines 

*** 

17.  3 
FUNCT 
♦  ** 

4.3 
*  * 

in  response  to  your  'DISPLAY  RETURN'  statement. 


DISPLAY  ALL 


Equivalent  to 

DISPLAY  PARTS;  DISPLAY  VALUES 


DISPLAY  |  PARTS  | 
j  STEPS  I 


Equivalent  to 

DISPLAY  STEPS  1.0C01  TO  9999-9999 


DISPLAY  VALUES 


LCC  will  type,  in  alphabetical  order,  the  names  and  current 
meaninqs  of  all  of  your  defined  identifiers  (i.e.,  the  meanings 
atop  each  of  your  variable  stacks).  Appropriate  formats  will  be 
used  for  values  (numeric,  loqic,  and  string)  and  references 
(label,  array.  J,ire,  and  pointer).  Each  displayed  line  will 
also  incl”’  level  number  which  indicates  the  level  of 
the  block  _n  Jn.  identifier  was  declared,  i.e.,  the 
outermost  olock  level  l »  '  '  current  meaning  will  hold.  For 
global  variables,  the  level  num^,_  zero  will  be  suppressed.  An 
example  of  the  displayed  output  is: 
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ARR  a 

ARRAY  [1:5, 

1 

LAB 

IN  3.6 

1 

LV 

^OOOOOOFF 

3 

NAE 

»ABC 

NV 

-1.234567.15 

PROC 

PROC EDO  RE 

2 

sv 

*ST# 

DISPLAY  <  STEPS  >  num_1  TO  num_2 


LCC  will  type  in  order  the  source  images  for  all  steps  whose 
numbers  are  between  nu«_l  and  nu*_2  inclusive.  As  in  a  group, 
i!  an  error  if  num.l  >  nu»_2  (unless  nu._2  <  1>.  Each  step  -ill 
begin  on  a  new  line  and  will  include  both  its  number  and  its  text. 
Except  for  possible  minor  differences  in  the  format  of  the  step 
number,  a  displayed  step  will  look  exactly  as  it  did  when  you 

typed  it  in. 


Examples: 


DISPLAY  41S.3  TO  415.7 


DISPLAY  <  STEP  >  num 

Equivalent  to 

DISPLAY  STEPS  num  TO  num 


DISPLAY  PAPTS  num_1  TO  num_2 


Equivalent  to 

DISPLAY  STEPS  (num_1  ♦  .0001)  TO  (num_2  ♦  .9999) 


Examples: 


DISPLAY  PARTS  4  TO  6 


DISPLAY  PART  num 


Equivalent  to 

DISPLAY  PARTS  num  TO  num 
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DISPLAY  I  <  STEPS  >  |  h  nui.  1  <  TO  num_2 
I  PAPTS  | 


A  DISPLAY  statement  may  include  a  group  list.  LCC  will  then 
display  all  the  specified  steps  or  parts,  orderinq  the  groups  for 
typinq  from  left  to  right  in  the  list. 

Examples: 

DISPLAY  1.4  TO  3.43,  3.8  TO  4.2,  4.513,  4.902 


DISPLAY  »-  varid  H  .,. 


LCC  will  type  out  the  current  meaning  for  each  varid  in  the 
list.  Each  displayed  •meaning*  will  take  up  a  single  line,  and  it 
will  include  exactly  the  same  information  that  would  be  typed  for 
that  variable  by  a  'DISPLAY  VALDES'  statement.  If  no  meaning  has 
been  assiuned  to  a  listed  varid,  the  varid  will  be  displayed  as 
•undefined*. 

Examples: 

DISPLAY  A,  C,  P,  III,1],  X  14,7, 11 


EXIT 


An  EXIT  statement  is  used  to  delete  the  context  of  the  part  or 
step  group  which  is  currently  active  and  give  you  control  in  the 
context  of  the  part  or  step  groun  which  called  it.  A  more  precise 
description  of  an  EXIT  is  as  follows: 

EXIT  recognizes  only  contexts  involving  explicitly  numbered 
steps  and  those  involving  the  user  (it.  regards  you  as  the  numbered 
step  0.0).  An  EXIT  statement  will  delete  all  execution  contexts 
down  to  and  Including  that  for  the  first  non-zero  numbered  step  on 
the  context  stack.  It  will  then  delete  all  contexts  down  to  but 
not  including  the  first  numbered  step.  If  that  is  a  step  0.0,  it 
gives  you  control;  if  not  it  adds  a  new  step  0.0  context,  which 
also  gives  you  control.  Thus  an  EXIT  deletes  all  execution 
contexts  down  to,  but  not  including,  the  first  numbered  step  below 
the  first  non-zero  numbered  step,  and  it  then  gives  you  control. 
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LCC  will  perform  successive  EXITS  until  the  global  state  is 
reached  (i.e.,  there  are  no  remaining  group  contexts)  and  it  will 
then  give  control  to  you. 

Examples: 

IF  ERR0R6  THEN  EXIT  ALL 


EXIT  <  TO  >  <  PART  >  e 


If  part  e  is  not  currently  active,  LCC  will  type  an  error 
message  and  give  control  back  to  you.  Otherwise  LCC  will  perforin 
an  EXIT.  If  the  resulting  context  is  that  of  part  e,  control  will 
be  qiven  to  you.  If  not,  LCC  will  perform  another  EXIT,  etc. 

Examples: 

EXIT  TO  PART  1 
EXIT  701 


<\  FOR  ident.  <|FR0N|  e  1  >|>  <|RY  e_2  <  TO  e_3  >|>  <  WHILE  e_4  >  DO  s 
!  |-  1  |  | TO  e_3  <  BT  e_2  >| 

|  FPON  e_1  | 


The  statement  s  will  be  executed  repeatedly  as  long  as  the 
expression  e_4  is  true  and  as  long  as  the  value  of  the  controlled 
ident  is  within  the  specified  range.  With  each  repetition,  the 
value  of  the  explicit  (ident)  or  implicit  control  variable  will  be 
modified  as  specified  by  the  controlling  for-clause.  The  phrase 
' fron  e_1'  may  be  omitted  if  e_1  *  1,  'BY  e_2'  may  be  omitted  if 
e_2  =  1,  'TO  e_.V  may  be  omitted  if  the  loop  is  to  be  terminated 

in  some  manner  other  than  that  of  the  controlled  variable  reaching 
a  final  value  (i.e.,  if  e_3  is  infinite),  and  'POR  ident'  may  be 
omitted  if  ident  does  not  appear  in  e_4  or  in  s  (in  which  case  an 
implicit  controlled  variable  will  be  used). 

Operation  of  a  complete  iteration  statement  is  equivalent  to 
that  of  the  LCC  block 

BEGIN  NEW  BYE  -  e_2,  TOE  -  e_3;  ident  -  e_1; 

L:  IF  IF  BYE  >  0  THEN  ident  <,  TOE  ELSE  ident  >  TOE 
THEN  IP  e_4  THEN  {  s;  ident  -  ident  ♦  BYE; 

GO  TO  L  >  END 

where  the  identifiers  L,  BYE,  and  TOE  do  not  occur  within  any  of 
the  e_T  or  in  s.  Note  that,  unlike  ALGOL  60,  the  increment  and 
terminal  expressions  e_2  and  e_3  are  evaluated  only  once,  when 
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execution  of  the  iteration  statement,  begins,  and  subsequent 
changes  to  any  variables  used  in  e_2  and  e_3  will  not  affect  the 
control  of  the  iteration. 

Examples: 

FOR  I  FROM  1  BY  G  TO  H+1  WHILE  N  *  3  DO  ST 
WHILE  B  <  C  DO  PART  2 
TO  T  DO  PART  345 
DO  PART  6543 

FOR  J  -  K  TO  P  BY  -2  DO  F(J,K) 


LCC  will  return  control  to  the  context  from  which  you  wero 
called,  resuming  execution  from  the  point  of  the  call.  A  GO  has 
meaning  only  after  you  have  been  called  via  a  statement  (PAUSE)  or 
action  (pressing  the  ATTN  or  BPEAK  key)  which  expects  you  to 
eventually  return  control  to  the  caller. 


|  GO  <  TO  >  |  e 
|  GOTO  | 


If  e  is  a  label,  it  must  be  that  of  a  statement  in  a  currently 
active  group.  LCC  will  then  EXIT  to  that  group  and  transfer 
execution  control  to  the  labelled  statement.  If  e  is  not  a  label, 
it  must  evaluate  to  a  step  number  in  a  currently  active  group.  If 
the  step  number  is  in  the  range  of  the  group  currently  being 
executed,  LCC  will  transfer  control  to  the  first  statement  in  the 
designated  step.  If  the  number  is  not  in  range,  LCC  will  EXIT  from 
the  current  group  context  and  repeat  the  above  process. 

Examples: 

GO  TO  LABL3 

GOTO  6.  1 

GO  1243.0001  ♦  J 


IF  e  THEN  s 


If  the  expression  e  evaluates  as  true,  execution  control  is 
transferred  to  s  (fro®  which  control  will  normally  pass  to  the 
successor  of  the  IF  statement).  If  e  evaluates  as  false,  s  is 
skipped.  If  e  has  a  logic  or  arithmetic  value,  it  will  be 
considered  as  true  if  it  is  non-zero  or  as  false  if  it  is  zero; 
strings  will  be  converted  to  their  equivalent  arithmetic  values. 
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IF  X  <  4  THEN  PAUSE 


IF  e  THEN  s_1  ELSE  s_2 


If  o  evaluates  as  true,  execution  control  will  be  transferred 
to  s_1,  from  which  control  will  normally  pass  around  s_2  to  the 
successor  of  the  IP  statement.  If  e  evaluates  as  false,  execution 
control  will  pass  around  s_1  to  s_2,  fro®  which  control  will  pass 
to  the  successor  of  the  IF  statement. 

Examples: 

IF  -P  v  Q  THEN  Z  -  5  ELSE  {  T  -  T  ♦  1;  TYPE  T  } 


TINE  <  e  > 


LCC  will  upspace  your  paper  (at  your  terminal)  by  one  line  or, 
if  an  expression  e  is  supplied,  by  e  lines. 

Examples: 

LINE 

LINE  4-J 


LOAD  <  FILE  >  e 


LCC  will  open  file  e  and,  if  the  file  was  created  by  one  or 
more  SAVE  statements,  load  into  working  storage  whatever  was  SAVEd 
there.  This  is  done  by  treating  the  information  in  the  file  as  a 
set  of  lines  of  input  text,  each  of  which  will  be  read  and 
translated  just  as  if  it  had  been  typed  in  by  you. 

LCC  treats  all  files  alike,  regardless  of  whether  they  were 
created  by  SAVE  or  WAITE  statements.  Thus  a  file  may  contain 
immediate  statements  which  were  written  (as  strings)  by  a  write 
statement.  These  will  be  both  translated  and  executed  durinq  a 
LOAD  of  that  file.  Any  immediate  statement  may  be  written  and 
LOADed,  including  another  LOAD  statement. 

Examples: 

LOAD  FILE  '0(?13# 
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NEW  ARRAY  h  h  ident  . , .  (  H  e  <  :  e  >  -i  .)  It  J.  1  H  .  , . 

t  '  I 


This  statement  acts  just  like  an  ARRAY  statement  except  LCC 
will  construct  a  new  incarnation-value  for  each  ident  before 
assigning  it  its  specified  array  structure. 

Examples: 

NEW  ARRAY  A3f  A4[10,  20,  5:301,  A5(5] 


NEW  •-  ident  -f  ., . 


This  declaration  statement  causes  a  new  incarnation-value  (IV) 
with  the  meaning  ^undefined"  to  be  constructed  at  the  current 
nesting  level  for  each  ident  in  the  list.  In  the  usual  case  that 
the  old  IV  is  on  a  lower  level,  this  new  IV  will  be  linked  to  the 
old  one,  which  it  will  temporarily  supersede.  In  case  the  old  TV 
is  on  the  current  level  (i.e  ,  the  ident  is  being  redeclared  in 
this  block),  it  will  be  replaced  by  the  new  one. 

A  declaration  holds  only  within  the  scope  >f  the  block  in 
which  it  is  executed.  When  that  block  is  terminated,  all  IVs 
declared  in  it  will  be  erased,  and  the  meanings  which  the 
corresponding  idents  had  before  their  declarations  were  executed 
will  be  restored. 

Examples: 

NEW  A , B 


NEW  V-  ident.  *  |  e  |  -I 

j  pointer  | 
j  procedure  | 
j  structure  j 


This  statement  acts  much  like  a  simple  NEW  statement,  but 
instead  of  giving  each  newly  constructed  IV  an  undefined  meaning, 
LCC  will  assign  it  a  specified  initial  '•value".  Declarations  and 
assignments  will  be  made  from  left  to  right  in  the  NEW  list,  but  a 
■•value"  will  be  constructed  before  the  ident  to  which  it  is  to  be 
assigned  is  declared.  Thus,  for  example,  in  the  statement 

NEW  A  -  B  ♦  A 

the  old  value  of  the  variable  A  will  be  added  to  3  to  obtain  the 
initial  value  of  the  new  A. 
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NEW  £  'SS',  T-U-V,  W~-»X 

NEW  P  -  v(A,B)  PART  9  (NEW  P  <-  VQ+RV,  S  -  6>* 

NEW  A  -  ARSAY(3,0:5J ,  3,  C  «■  26,  D  -  ARRAY[X:Yl 


NUMBER  AS  p.!  <  BY  e  2  > 


LCC  will  automatically  type  out  for  you  at  the  beginning  of 
each  input  line  a  step  number  followed  by  a  colon  (:).  Before 
translation,  the  supplied  number  will  be  appended  as  a  prefix  to 
whatever  step  text  you  type.  The  numbering  sequence  will  normally 
start  at  e_1,  with  successive  step  numbers  being  incremented  by 
e„2,  hut  if  any  numbers  in  the  sequence  (including  e_1)  turn  out 
to  be  integers,  they  will  be  skipped.  Thus  it  is  quite  acceptable 
for  the  numbering  to  cross  part  boundaries.  If  e_2  is  given,  its 
value  must  lie  between  .0001  and  .9999;  if  the  'BY'  phrase  is 
missing,  e_2  will  be  assumed  to  be  .01. 

LCC's  automatic  numbering  will  continue  until  you  turn  it  off; 
this  is  done  by  inputting  an  empty  step,  i.e.,  by  pressing  the 
RETURN  key  immediately  after  the  step  number. 

FxamDi.es: 

NUMBER  AS  17.3  BY  .002 


NUMBER  group  AS  e_1  BY  e_2 


LCC  will  renumber  and  retranslate  the  ordered  set  of  steps 
from  the  specified  group.  The  renumbering  will  start  with  e_1  (or, 
if  e_1  is  an  integer,  with  <e_1  *  e_2))  and  successive  step 

numbecs  will  be  incremented  by  e_2  (whose  value  must  lie  between 
.0001  and  .9999).  The  original  group  of  steps  will  be  deleted  by  a 
NUMBER  statement  (otherwise  this  statement  acts  exactly  the  same 
as  the  corresponding  COPY  statement,  which  does  not  delete  the 
group).  The  source  text  for  a  step  will  not  be  modified  ty  a 
NUMBER  statement,  and  it  is  your  responsibility  to  make  sure  that 
the  renumbered  steps  do  not  contain  spurious  references  to  steps 
in  the  original  group.  To  insure  this,  you  should  use  labels 
rather  than  step  numbers  to  refer  from  one  statement  in  the  group 
to  another. 

Examples: 

NUMBER  STEPS  7.7  TO  8.2  AS  25  BY  .02 
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NUMBER  group  AS  e 


w-ss-s  -  ----  - 

tV.f!  statement 

NUMBER  qroup  AS  e  BY  .01 

A11  fr  forththerigioup  9£ill  ISrb^aodif ied^y  this  NUMBER 

statement?  but  the  original  group  will  J?  *  15 

statement  is  identical  to  the  statement  'COPY  group  AS  e  ). 


Examples: 


NUMBER  8.07  AS  14.253 

NUMBER  STEPS  6.4  TO  6.5  AS  1016 


NUMBER  group  BY  e 


Equivalent  to 

NUMBER  qroup  AS  X  BY  e 

step  numbers  for  a  part  without  changing  it„  name  (x.e.,  s  p 
number) . 


Examples: 


NUMBER  PART  803  B/  (INC  *  .0001) 


NUMBER  group 


Equivalent,  to 

NUMBER  group  BY  .01 


Examples: 


NUMBER  STEPS  43.001  TO  43.18 


1ft 
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OFF 


LCC  will  perform  an  'EXIT  ALL'  and  it  will  then  log  you  off.  A 
message  will  be  written  to  indicate  the  elapsed  time  and  the 
processor  time  used  during  you7-  conversational  session.  Your 
automatic  reload  file  will  be  erased  by  this  OPF  statement  (see 
Appendix  G) . 

Examples: 

IF  DONE  THEN  OFF 


OFF  SAVE 


This  statement  acts  lust  like  a  simple  OFF  statement  except 
for  its  treatment  of  your  automatic  reload  file,  which  will  not  be 
erased  and  thus  may  be  reloaded  when  you  begin  your  next 
conversational  session  (see  Appendix  G). 


PART  num 


A  new  block  context  will  be  set  up  for  the  sequence  of  steps 
from  num*. 0001  to  numt.9999.  Execution  will  then  begin  within  that 
context  at  the  first,  step  whose  number  is  >  num*. 0001  and  it  will 
normally  continue  through  successively  higher  numbered  steps. 
Control  will  be  returned  when  the  part  mruns  off  its  end'  or  when 
it  executes  a  RETURN  statement,  an  EXIT  statement,  or  a  GOTO  which 
transfers  out  of  its  range. 

A  part  may  be  called  either  as  an  operand  in  an  expression  (in 
which  case  it  should  return  a  result)  or  as  a  statement.  In  the 
latter  case  it  should  not  return  a  result,  but  if  it  does,  LCC 
will  type  the  value  of  the  result  at  your  terminal. 

Examples: 

PART  5 

TO  PART  17  DO  PART  ABACA D 


n APT  num  f  s_1  ;  s_2  ;  ...  :  s_N  > 


A  new  block  context  will  be  set  up  for  the  sequence  of  steps 
in  part  num.  Execution  control  will  then  be  transferred  to 
statement  s_1,  from  which  control  will  normally  pass  to  s_2,  s_3, 
...  in  order  up  to  s_N,  from  which  control  will  pass  to  t.he  lowest 
numbered  step  in  part  num.  Thus  the  statement  list  within  the 
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braces  is  treated  as  if  it  were  a  step  numbered  num+. 00009  in  a 
part  context  which  is  expanded  to  include  that  step. 


Examples: 


PART  (J  ♦  2)  f  NEW  A-^BtCl;  TYPE  D  ♦  A;  E-16  ) 
PART  J  C  NEW  A  *  G-H  ;  NEW  D  -  *  R  /  PART  2  7 


> 


PAUSE 


LCC  will  type  a  message  giving  the  step  number  of  the  PAUSE 
statement,  after  which  it  will  give  control  to  you. 


Examples: 


IF  X  <  4  THEN  PAUSE 


PAUSE  e 


LCC  will  type  out  the  string  supplied  by  the  expression  e, 
after  which  it  will  give  control  to  you. 


Examples: 


PAUSE  'HALF  DONE' 


PRINT  <  FILE  >  e 

I.CC  will  print  (on  the  line  printer  in  the  JWjiter  coom}  the 
contents  of  file  e,  which  must  have  been  generated  by  an  LCC  SAVc, 

or  WRITE  statement.  File  e  will  not  be  changed  by  ^"will 

but  if  you  PRINT  a  file  during  a  conversational  session,  you  will 

not  be  allowed  to  delete  it  later  on  in  that  same  session. 


Examples: 


PRINT  FILE  'PRNTFIL' 


RECOVER  <  e  > 


LCT  will  treat  a  RECOVER  statement  as  a  dummy  statement  unless 
vou  give  it  from  a  user  state  which  was  entered  because  of  an 
r  In  a  delayed  step.  In  the  latter  case,  your  furnished 

expression  e,  which  will  only  be  acceptable  if  ^be^  sed 

caused  the  error  halt  should  have  produced  a  result,  will  °e 
as  that  result,  and  LCC  will  resume  execution  from  the  point  of 
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the  error  as  if  the  operation  had  been  completed.  A s  an  example, 
if  your  program  halts  with  the  error  message 

ERROR  ORO 1  AT  4.1  DIVISION  BY  ZERO 

you  may  resume  execution  by  typing  the  statement 

RECOVER  3„20 

Execution  will  then  continue  just  as  if  the  divide  operation  had 
been  completed  normally  and  had  yielded  the  result  3„20. 

In  some  cases  it  is  possible  to  resume  execution  after  errors 
whore  no  explicit  result  is  involved.  In  those  cases  you  may  use  a 
simple  RECOVER  statement  which  furnishes  no  result  expression.  As 
an  example,  if  you  attempt  to  call  part  3  when  part  3  is  empty, 
LCC  will  halt  execution  of  your  program  with  an  error  message  such 
as 


ERROR  PC02  AT  5.2  PART  3  DOES  NOT  EXIST,  YOU  CANNOT  CALL  IT 

You  could  then  resume  execution  by  typing  the  lines 

3.1:  LOAD  STUFF 
RECOVER 

Examples: 

RECOVER  X  ♦  Y 


RETURN 


LCC  will  delete  the  current  execution  context  and  return 
control  to  its  caller,  resuming  execution  from  the  point  of  the 
call. 


RETtTRN  e 


This  statement  acts  just  like  a  simple  RETURN  statement  except 
the  value  of  e  is  computed  before  the  RETURN  is  performed,  and 
that  value  is  the  result,  of  the  call. 

Examples: 

RETURN  X  -  Y  1  3 
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RETURN  pointer 


This  statement  acts  just  like  a  simple  RETURN  statement  except 
the  specified  reference  pointer  is  constructed  before  the  RETURN 
is  performed  and  that  pointer  is  the  result  of  the  call. 

Examples: 

RETURN  =  VRLtI+1] 


RETURN  procedure 


This  statement  acts  like  a  simple  RETURN  statement  except  a 
reference  to  the  given  procedure  is  constructed  before  the  RETURN 
is  performed  and  that  reference  is  the  result  of  the  call.  Thus  if 
a  procedure  PR,  which  is  called  via  the  statement 

RED  -  PR ( X, Y , 7) 

returns  with  the  statement 

RETURN  v  ( A , H)  PART  66  V 

the  effect  (except  for  possible  side  effects)  is  to  perform  the 
assignment 

RED  -  v  ( A, H)  PART  66  * 

Examples: 

RETURN  v  STEPS  4.8  TO  AZ  v 

PETURN  v  <B,C)  {  t'A PT  7;  PART  25  >  v 


SA/E  save-object 


LCC  will  put  the  save-object  (a  list  of  steps  and/or  values) 
into  the  currently  open  file.  A  step  will  be  SAVEd  in  the  same 
form  that  would  be  used  to  DISPLAY  it,  which  is,  except  for 
possible  minor  differences  in  the  format  of  the  step  number,  the 
same  form  that  you  used  to  type  it  in.  The  current  meaning  of  a 
variable  will  be  SAVEd  as  an  assignment  statement  which  assigns 
that  meaning  to  the  variable.  Thus  a  SAVEd  file  c;n  be  reloaded 
merely  by  executing  it;  this  is  done  by  means  of  a  LuAD  statement. 
Note  that  no  context  information  will  be  kept  with  a  SAVEd 
variable,  and  it  will  be  up  to  you  to  recreate  the  proper  context 
into  which  to  later  load  the  file.  Only  variables  whose  meanings 
are  values  (numeric,  logic,  or  string),  pointers,  or  arrays  will 
be  SAVEd.  An  array  will  be  saved  as  a  structure  assignment 
followed  by  assignment  statements  for  each  of  its  SAVE-able 


22 


ICC  Statements 


element  s. 

A  SAVE  statement  does  not  save  numeric  values  to  their  full 
precision  (about  17  digits)  but  only  to  the  precision  of  the 
printing  routines  (10  digits).  Thus  a  SAVEd  and  reLOAHed  program 
may  not  function  exactly  the  same  as  if  it  had  been  run  in  a 
single  session.  This  will  not  usually  be  noticeable,  but  it  will 
show  up  if  numbers  such  as  PI  and  EE  (which  ace  initially  accurate 
to  the  last  bit)  are  saved  or  if,  for  example,  X  =  1/3  is  SAVEd. 
In  the  latter  case  we  would  normally  get  3  *  (1/3)  to  print  as  1 
(due  to  rounding  in  the  output  routines;  3  *  (1/3)  =  1  is  FALSE, 
however),  but  after  saving  and  reloading  X  we  would  get  3  *  X  to 
yield  .9999999999. 

Any  number  of  SAVE  statements  can  be  executed  to  qenerate  a 
given  file;  each  will  append  its  lines  at  the  end  of  those  already 
in  the  file. 

Examples: 

SAVE  STEPS  35.6  TO  35.8 
SAVE  X,  Y  ( I,  1 1 ,  TIT, 2],  Z 


SAVE  save-object  AS  <  FILE  >  e 


Equivalent  to 

USE  FILE  e;  SAVE  save-object 

Examples: 

SAVE  PARTS  45  TO  493  AS  FILE  %CAT' 


STEPS  num_1  TO  num_2 


This  *step  call*  is  an  ^execute*  statement,  which  may  be  used 
to  perform  steps  from  seme  other  portion  of  your  program  as  if 
they  had  been  copied  in-line  in  its  placf  As  in  a  group,  num_1 
must  be  <  num_2  (unless  num_2  <  1).  LCC  will  set  up  a  new  group 
context  (non-block)  for  the  sequence  of  steps  from  num_1  to  num_2. 
Execution  will  then  begin  at  step  num_1,  and  it  will  continue 
through  successively  higher  numbered  steps.  This  step  call  will 
normally  bo  terminated  either  by  a  RETURN  statement  without  a 
value  or  by  ^running  off  the  end*  of  the  step  group.  An  EXIT 
statement  will  terminate  the  step  call  and  return  control  to  you 
in  the  context  of  its  calling  group. 

Examples: 

STEPS  3.8  TO  3.93 


•0 
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2  3  I 


Equivalent  to  the  statement 
STEPS  nura  TO  num 


TYPE  I-  type-object  H  .  ,. 


Foe  a  type-object  consisting  of  an  expression  e,  LCC  will  type 
the  value  of  e,  left- justified  on  a  line.  A  numeric  value  will  be 
rounded  to  10  significant  decimal  diqits  and  typed  as  an  integer 
or  a  decimal  number,  with  an  exponent  part  being  appended  if 
necessary.  A  logic  value  will  be  typed  as  TRUE  or  FALSE  or  as  an 
0-diqit  hexadecimal  number  (i.e. ,  it  will  have  the  form  of  a 
logic- literal) .  A  string  value  will  be  typed  as  is  without 
surrounding  quote  marks. 

LCC  will  ignore  an  empty  type-object  in  this  unformatted  TYPE 
statement. 

A  for-clause  in  a  type-object  merely  specifies  control  over 
another  type-object,  but  the  controlled  objects  will  be  typed  just 
as  if  the  for-clause  were  outside  the  type  statement  instead  of 
inside.  As  an  example,  the  type-object 

(  for-clause  e_2  ,  e_3  ) 

will,  under  control  of  the  for-clause,  type  values  for  e_2,  e_3, 
e_2,  e_3,  ...  ,  one  per  line. 

Examples: 

TYPE  A  ♦  B,  ,  C 

TYPE  P,  (FOR  I  TO  1 9  00  I,  CABiTlJ]]) 


li S F  <  FILE  >  e 
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STEP  num 


The  expression  e  must  evaluate  to  a  string  whose  body  will  be 
used  as  a  file  name.  T.CC  will  open  that  file  and  use  it  in  any 
subsequent  SAVE  or  WRITE  statement  which  does  not  mention  a  file 
explicitly.  Only  one  such  file  can  be  open  at  any  time,  so  file  e 
will  be  closed  either  bv  a  logoff  or  by  executing  ary  filing 
statement  (including  another  USE)  which  explicitly  mentions  a 
different  file. 

A  file  name  must  be  an  identifier  (ident)  of  length  <  8  which 
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does  not  contain  any  lower  case  letters  or  underline  (_) 
characters. 

Examples: 

USE  FILE  'CWIC' 


WRIT*  h  type-object  H  . ,. 


This  statement  is  just  like  a  TYPE  statement  except  the 
type-objects  will  be  written  on  the  currently  open  file  instead  of 
at  your  terminal.  any  number  of  WRITE  statements  can  bo  executed 
to  write  a  given  file;  each  will  append  its  lines  at  the  end  of 
those  already  written. 

Examples: 

WRITE  A,  B*C 

WRITE  (FOR  I  TO  10  DO  (FOR  J  TO  10  DO  FISH(I,J])> 


WRITE  h  t  ype-object  H  . ,  .  AS  <  FILE  >  e 


Equivalent  to 

nSE  FILS  e;  WRITE  type-object  H 


?  H  <  string-literal  >  varid  H  . ,. 


For  each  varid  in  the  list,  the  following  process  will  be 
performed:  LCC  will  type  either  a  standard  identifying  message  or, 
if  vou  preceded  the  varid  by  a  string-literal,  the  string  which 
you  supplied.  It  will  then  give  control  to  you.  You  must  type  the 
text  for  an  exDcession  and  return  control  to  LCC  (by  pressing  the 
RETURN  key).  Your  expression  will  then  be  evaluated  and  assigned 
to  varid. 

Examples: 

?  A,  B 

?  'TYPE  RANK'  R  NK (3 ] ,  RNK 14] 


?  $  h  <  string-literal  >  varid  H 


This  statement  acts  like  the  regular  ?  statement  except  LCC 
will  treat  each  of  your  typed  expressions  as  the  body  of  a  string 
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(i.e. ,  it  will  surround  each  expression  by  quote  marks).  Thus  the 
value  assigned  to  each  varid  will  always  be  a  string. 

A  slight  variation  is  possible  here  in  the  use  of  single-quote 
marks,  which  need  not  be  doubled  to  appear  in  your  requested 
string  body.  Thus  if  you  type 

AB'C'D 

in  response  to  the  statement 
?$  ST 

the  effect  will  be  exactly  the  same  as  if  you  had  executed  the 
statement 

ST  -  %AB"C"D' 

Examples: 

?$  S,  'T  STRING  •  T 


H  s  H  . ;  .  } 


This  'compound  statement*  will  be  treated  as  a  single  control 
unit  whose  sub-statements  will  be  executed  sequentially  from  left 
to  right.  A  compound  statement  is  not  a  block  and  it  may  not  have 
its  own  local  variables;  therefore  its  main  use  is  within  a 
controlling  statement  such  as  an  IP,  CASE,  or  iteration. 

Examples: 

IF  -P  v  Q  THEN  Z  -  5  ELSE  {  T  -  T  ♦  1;  TYPE  T  } 


e 


The  expression  e  must  evaluate  to  a  string,  whose  contents 
will  be  treated  as  statement  data  to  the  LCC  translator.  When  a  ! 
statement  is  executed,  the  string  which  it  supplies  will  be 
processed  just  as  if  it  wore  a  step  which  was  just  typed  in.  If 
the  st.rinq  turns  out  to  be  an  immediate  step,  it  will  be  executed 
as  the  current  statement.  If  not,  it  will  be  stored  as  usual  for  a 
delayed  step  and  control  will  pass  to  the  successor  of  the  ! 
statement.  This  statement  is  useful  mainly  in  programs  which 
generate  new  program  text  during  execution. 


Examples: 


'A  *■  B  ♦  C;  a  Translate  this  later' 
S  °  T 

'STEP  8. 44*;  v 


Same  as  the  statement  STEP  8.44 
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a  <  h  character  H  ...  > 


No  operation  will  be  performed.  The  character  sequence  will  be 
treated  merely  as  a  comment,  with  all  characters  following  the 
first  a  in  a  step  being  completely  ignored. 

Examples: 

A  THIS  IS  A  COMHENT  LINE. 


var  ~  e 


The  variable  designator  var  is  first  elaborated  (cycling  all 
the  way  'own  its  pointer  chain  if  it  begins  one)  to  obtain  the 
•elaborated  address*  of  a  value  (non-reference)  entry.  Then  the 
expression  e  is  evaluated  tc  yield  a  numeric,  logic,  or  string 
value.  That  value  is  assigned  to  the  elaborated  address  of  var, 
with  no  conversions  of  any  sort  being  performed. 

Examples: 

K  -  H  a  ,(F0 

P  f  3 1  *•  A  ♦  ( B  *-  B  ♦  1)  ♦  R  (N) 


var  -  v  <  (  t-  ident  H  .,.  )  >  |  e  |  v 

1  h  s  H  .;.  | 


var  is  treated  as  in  an  expression-assignment.  A  reference  to 
the  given  procedure  will  be  constructed  and  assigned  to  (the 
elaborated  address  of)  var.  The  procedure  body  is  either  the 
expression  e  or  the  statement  list,  and  the  listed  idents  are 
formal  identifiers  in  that  body.  When  the  procedure  is  called, 
actual  parameters  must  be  supplied  to  replace  the  formal 
identifiers  during  execution  of  e  or  the  list  of  statements  s.  For 
a  procedure  with  no  parameters,  the  formal  identifier  list  is 
normally  omitted.  If  so,  parentheses  cannot  be  used  to  surround  a 
procedure-body  expression,  because  they  would  be  treated  as 
parameter  delimiters.  To  get  around  this  syntactic  ambiguity,  LCC 
allows  an  empty  formal  parameter  list  to  precede  a  procedure-body 
expression  e  (but  not  a  statement  list). 

Once  var  has  been  made  a  rr°c**^ure  name,  any  mention  of  it  in 
an  expression  or  assignment  will  cause  the  procedure  to  be 
evaluated.  Thus  the  meaning  of  the  var  cannot  be  changed  unless  it 
is  first  redeclared  or  DELETEd. 
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Examples: 

PROC  -  v(F,G)  F  ♦  G  *  Hv 

G  -  7  PART  81  f  NEW  Z  -  7  ♦  1;  Q  -  0  )  V 

C(I,J]  -  7 ( X )  PART  3717 

P3  -  7  f  PART  4;  PART  68;  I  -  I  ♦  1  )  7 

F  -  7  ()  IF  X  <  48.3  THEN  T+1  ELSE  T  7 


var  -  ARRAY  [  H  e  <  :  e  >  H  .  |  H  {.  ) 

(  .  I 


LCC  will  assign  to  var  the  multidimensional  array  structure 
specified  by  the  given  bounds  list.  The  bounds  list  gives  the 
number  of  dimensions  of  the  array  structure  and  the  limits  on  each 
of  its  subscripts.  An  item  in  the  bounds  list  can  be  either  a  pair 
of  expressions  specifying  the  lower  and  upper  limits  on  the 
subscript  for  that  dimension  or  a  sinqle  expression  specifying  the 
upper  limit  on  that  subscript  (the  lower  limit  will  be  implicitly 
1). 

Storage  will  not  be  allocated  for  an  array  intil  that  array  is 
used,  and  even  then  it  will  only  be  allocated  for  a  given  row  when 
an  element  from  that  row  is  first  accessed.  LCC  keeps  identifying 
information  for  each  element  in  an  array,  and  therefore  arrays 
need  not  be  homogeneous.  Thus,  for  example,  in  a  given  row  an 
array  could  contain  elements  which  were  procedures,  pointers, 
numeric  values,  string  values,  and  even  arrays. 

Note  that  if  the  var  above  is  an  identifier,  this  statement 
form  is  exactly  equivalent  to  an  ARRAY  statement.  Thus  the  two 
statements 

A  -  ARRAY (0:4,61 
ARRAY  A (0  : 4, 61 

are  equivalent.  However,  if  the  var  is  subscripted,  we  can  with 
this  statement  specify  that  an  array  element  is  to  be  itself  an 
array,  an  effect  which  is  not  possible  with  an  AR»AY  statement. 

Examples: 

LA  -  ARRAYf1:N,  -3  :  8*K] 

P [2 , 4 1  *  ARRAY15, 10,24] 


var  *■  pointer 


var  is  treated  as  in  an  expression-assignment.  The  specified 
reference  pointer  will  be  constructed  and  assigned  to  (the 
elaborated  address  of)  var. 
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.  al1rtU  a  variable  to  point  tc  another  which  is 
LCC  cannot  allow  a  ™ria Die  therefore  such  an 

declared  in  an  inner  (higher  -  .  will  be  rejected.  An 

assignment  which  would  create  •-  circuiai 
A  «-  a  B ;  R  *-  =»  A 
will  also  be  rejected. 


Examples: 


NT)  *■  »AHtI,J'J 


<  (  <  h  |  e 

)  pointer  ? 
j  procedure  J 


>  )  > 


_  .  nerformed,  using  the  items 

The  procedure  referenced  by va  *  1one  by  setting  up  a  new 

in  the  list  as  actual  Pieters.  This  iaint#  listed  in  the 

block  context,  declaring  as  N.  -  cach  actaal  parameter  to 

definition  of  var,  assigning,  ^*n  transferring  control  to 

the  corresponding  ^.n  JiU  ^  returned  when  the  procedure 

the  body  of  var.  Control  it  'runs  off  its  end'  (which 

executes  a  RSTURS  be  executed),  when  it  executes  an 

causes  an  implicit  t  s  a  r,OTO  which  transfers  out  of 

EXIT  statement,  or  when  it  execu  _*  .  ither  as  an  operand  in  an 

its  boa,.  .  P “~J»“  S*  XI  C:i£uel2U  result)  or  as  a 

expression  (in  which  case  ehnuld  not  return  a  result,  but 

f/lrlies,'  ?hre«"ueS  of  the  result  .ill  be  typed  out  at  your 
tertnine  1. 

».  an  exa.ple.  suppose  .e  have  executed  the  procedure 
assignment 

P  ~  v  (A,  9,  C)  PART  3  V  i 

and  we  execute  the  step 

R  (  X  -  Z  ,  *  (G>  G  ♦  H  /  3  v»  3  w  1  ;  S  ; 

A  new  block  context  .ill  be  openen,  uCC  .111  perfora  the 
statements 

NEW  A  •-  X  -  Z  ; 

NEH  3  »-  V  (G)  G  *  H  /  3V  ; 

new  c  -  ^  R  ; 

and  execution  ^^"^^^rmiwtio^of  t he 1  part,  the  block 

s^ep  it.  part  3.  After  norma  -  roceP(i  with  the  successor  to 

context  will  be  closed  and  LCC  will  proce 
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the  procedure  call,  i.e.,  statement  S. 

Procedures  need  not  have  parameters;  thus  the  actual  parameter 
list  may  be  omitted.  If  more  actual  parameters  than  formals  are 
supplied,  the  leftmost  actuals  will  be  used,  with  the  extra  ones 
being  stacked  for  the  duration  of  the  procedure  incarnation.  If  in 
a  subsequent  nested  procedure  call  too  few  actual  parameters  are 
supplied,  the  extra  actual  parameters  from  outer  procedure  calls 
will  be  used,  with  those  from  the  innermost  calls  being  used 
first. 


Examples: 


PTN 

F(A,X-Y) 

FN ( P+ 1 ,  aQ,  V  R  ♦  PART  2  v  ) 
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LCC  cannot  allow  a  variable  to  point  to  another  which  is 
declared  in  an  inner  (higher)  nestinq  level;  therefore  such  an 
assignment  will  lead  tc  an  error  message  and  will  ho  rejected.  An 
assignment  which  would  create  a  circular  pointer  chain,  as  in 

A  a  B ;  B«-aA 
will  also  be  rejected. 

Examples: 

ND  -  a AH tl , J] 


var  <  (  <  b  1  «  |  H  .,.  >  )  > 

j  pointer  | 
j  procedure  j 


The  procedure  referenced  by  var  is  performed,  using  the  items 
in  the  list  as  actual  parameters.  This  is  done  by  setting  up  a  new 
Mock  context,  declaring  as  HEW  all  formal  idents  listed  in  the 
definition  of  var,  assigning,  in  order,  each  actual  parameter  to 
the  corresponding  formal  ident,  and  then  transferring  control  to 
the  body  of  var.  Control  will  be  returned  when  the  procedure 
executes  a  RETURN  statement,  when  it  •runs  off  its  end*  (which 
causes  an  implicit  RETURN  to  be  executed),  when  it  executes  an 
l.X It  statement.,  or  when  it  executes  a  GOTO  which  transfers  out  of 
its  body.  A  procedure  may  be  called  either  as  an  operand  in  an 
expression  (in  which  case  it  should  return  a  result)  or  as  a 
statement.  A  procedure  statement  should  not.  return  a  result,  but 
if  it  does,  the  value  of  the  result  will  be  typed  out  at  your 
terminal. 

As  an  example,  suppose  we  have  executed  the  procedure 

assignment 

P  -  V  (A,  B,  C)  PART  3  V  ; 
and  we  execute  the  step 

R  (  X  -  2  ,  v  (G)  G  *  H  /  3  v,  a  W  )  ;  S  ; 

A  new  block  context  will  be  opened,  LCC  will  perform  the 
statements 

NEW  A  -  X  -  Z  ; 

NEW  3-v  (G)  G  ♦  H  /  3  v  • 

NEW  C  -  3  W  ; 

and  execution  will  begin  in  the  new  block  context  at  the  first 
step  in  part  3.  After  normal  termination  of  the  part,  the  block 
context,  will  be  closed  and  LCC  will  proceed  with  the  successor  to 
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the  procedure  call,  i.e.,  statement  S. 

Procedures  need  not  have  parameters;  thus  the  actual  parameter 
list  may  be  omitted.  If  more  actual  parameters  than  formals  are 
supplied,  the  leftmost  actuals  will  be  used,  with  the  extra  ones 
beinq  stacked  for  the  duration  of  the  procedure  incarnation.  If  in 
a  subsequent  nested  procedure  call  too  few  actual  parameters  are 
supplied,  the  extra  actual  parameters  from  outer  procedure  calls 
will  be  used,  with  those  from  the  innermost  calls  beinq  used 
first. 


Examples: 


PTN 

P  ( A , X- Y  ) 

FN ( P* 1 ,  aQ,  v  R  *  PART  2  v  ) 
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binary-operator  : : -  |-|  t  |*  |/| *|  •  | ♦( - 1<|<; |=  |>|>| *|— -|— »|  a|  v  |  =|  o| 


unary-operator  j:=  J  ♦  |  -  |  *  {  -  | 

e  ::=  |  primary  | 

|  unary-operator  e  j 

I  e_1  binary-operator  e_2  I 


|  IF  e  THEN  e. 1  ELSE  e_2  | 


An  expression  (e)  in  LCC  is  a  combination  of  value  entities 
(primaries)  with  operator  symbols  which  acts  as  a  rule  for  the 
computation  of  a  value.  Syntactically,  an  expression  may  be 
degenerate  (i.e.,  a  single  primary),  it  may  be  a  prefixed 
unary-operator  acting  on  a  value,  it  may  be  the  combination  of  two 
values  with  an  infix  binary-operator,  or  it  may  be  conditional, 
with  a  distributed  operator  (IF  ...  THEN  ...  ELSE  ...  )  which 
selects  one  from  a  given  pair  of  values. 

The  value  of  an  LCC  expression  will  normally  be  used  as  a 
constituent  in  a  statement.  However,  if  an  expression  appears  in 
place  of  a  statement  (or  if  a  syntactically  correct  LCC  statement 
turns  out  to  have  a  value),  its  computed  value  will  be  typed  back 
to  you.  This  gives  LCC  its  •desk  calculator*  feature,  whereby  you 
need  merely  to  type  an  expression  to  obtain  its  immediate 
evaluation  —  there  is  no  need  to  write  a  •program*  to  do  so. 
Note,  however,  that  if  LCC,  when  scanning  for  a  statement,  finds 
as  its  first  item  an  IF,  ?,  or  !,  it  will  treat  what  follows  as  a 
statement,  not  an  expression.  If  that  is  not  what  you  mean,  you 
may  use  parentheses  around  your  expression,  and  LCC  will  then 
treat  it  correctly. 

A  conditional  (IF)  expression  act&  much  like  an  IF  statement. 
If  the  expression  e  evaluates  as  true,  the  value  of  the 
conditional  expression  is  e_1;  if  e  evaluates  as  false,  the  value 
is  e_2.  Thus,  if  the  variable  AVAL  -  1,  the  value  of  th*. 
expression 

TF  AVAL  <  5  THEN  325  ELSE  839 


is  325. 

The  unary-operators  are  %*#,  and  A  unary  is 
redundant,  and  +e  =  e  nc  matter  whether  e  is  a  number,  a  logic 
value,  or  a  string.  A  unary  is  a  negation  operator  which 
changes  the  sign  of  any  non-zero  value  to  which  it.  is  applied  (a 
zero  is  always  positive).  **'  is  a  truncation  operator  whose 
result  is  the  integer  portion  of  the  value  to  which  it  is  applied. 
Thus  *  2.  8  =  2,  *-3.1  =■  -3,  and  *341  =  341.  and  %*'  are 
arithmetic  operators  which  can  act  only  on  numeric  values;  if  they 


ICC  Metavariables 


31 


are  applied  to  loqic  values  or  to  strings,  those  values  will  be 
converted  to  numbers  before  the  operations  are  performed.  '*•'  is  a 
complement  operator  whose  result  is  the  bit-by-bit  logical 
complement  of  the  32-bit  value  to  which  it  is  applied  (i.e.,  each 
binary  1  becomes  a  zero  and  each  binary  0  becomes  a  one).  Thus 

-TR0E  =  FALSE  (=  /0)  ,  -.iFEDO  =  ^PFFP012F 

Note  that  multiple  unary-operators  may  precede  a  primary;  if  so 
the  operations  which  they  represent  will  be  performed  from  right 
to  left.  Thus 


*-3.1  =  *(-3.1)  =  -3  =  -*3.1  =  -(*3.1) 

*♦-3.1  =  -*-*-3.1  =  ** - 3.1  =  *~ ♦~/pFFFFFFC  =  -3 

Like  the  unary-operators,  the  binary-operators  can  act  only  on 
values  with  the  proper  data  attributes.  If  one  is  used  with  values 
having  improper  attributes,  appropriate  conversions  (with  a  bias 
from  string  to  logic  value  to  number)  will  be  automatically 
performed  before  the  operator  is  executed. 

The  binary-operators  V',  *♦',  '♦',  and  are 
numeric  operators;  each  acts  on  numeric  values  to  produce  a 
numeric  result.  M  '  denotes  exponentiation,  with  e_ 1  as  the  base 
and  e_2  as  the  exponent.  The  operators  '♦',  and  *♦'  have  the 
conventional  meanings  of  addition,  subtraction,  and 
multiplication.  '/'  is  the  usual  numeric  (real)  division,  with  a 
real  result;  (integer  divide)  and  *•'  (modulus,  or  remainder 
divide)  cause  a  real  division  operation  to  be  performed,  but  *«' 
gives  only  the  integer  portion  of  the  real  result  as  its  value 
(i.e.,  A  *  B  =  *(A/B))  while  *•'  gives  on’y  the  remainder  (i.e., 
A*B  =  A-  B*  ( A*B) ) .  Thus 

3.2  *  2  =  1,  3.2  •  2  =  1.2 
4.7  *  -3  =  -1,  4.7  •  -3  =  1.7 

'v'#  and  are  logic  operators;  each  acts 
bit-by-corresponding-bit  on  logic  values  to  produce  a  logic  value. 
They  have  the  conventional  meanings  of  logical  AND,  OR,  and 
equivalence. 

‘O'  is  a  string  concatenation  operator  which  causes  the  body 
of  string  e_2  to  be  appended  to  that  of  e_1. 

The  operators  *«■'  and  will  shift  a  logic  value  or  a 
string  left  or  right.  e_2,  which  will  be  truncated  to  an  integer, 
is  ♦he  length  of  the  shift,  while  e_1  is  the  value  to  be  shifted. 
Shiits  will  be  by  bits  for  logic  values  and  by  characters  for 
strings.  A  shift  of  a  (fixed  iength)  logic  value  will  cause  any 
bits  which  are  shifted  out  of  the  value  to  be  lost;  vacated 
positions  at  the  other  end  of  the  value  will  be  filled  in  with 
zeros.  A  string,  however,  does  not  have  a  fixed  length.  Characters 
shifted  moff  the  end*  will  be  lost,  but  there  will  be  no  mvacated 
positions*  —  the  string  merely  becomes  shorter.  Thus  we  will  get 
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the  following  results: 

'ABCDSFG'  —  4  =  'ABC' 

'  A8CDFFG'  «-*■  2  =  'CDEFG' 

' ABCDEFG'  ~~  2  4  =  'C' 

The  relational  operators  '<',  '>',  and  can 

act  on  any  operands  with  matching  attributes.  The  meanings  of  the 
relations  are  obvious  for  numeric  operands.  Each  produces  as  its 
result  a  Boolean  value  (TRUE  or  FALSE).  For  logic  values,  '='  and 
act  bit-by-bit  to  produce  logic  values  which  will  be, 
respectively,  the  logical  eguivalence  and  exclusive  OR  of  their 
operands  (i.e.,  L  =  M  is  the  same  as  L  ^  M,  and  L  *  M  is  the  same 
as  ~(L=M>).  If  the  other  relations  (<,  <,  >,  >)  are  applied  to 
loaic  values,  those  values  will  first  be  converted  to  numbers  and 
then  the  usual  rules  for  relations  on  numbers  will  be  followed. 
Relations  on  strings  will  he  performed  character-by-character  from 
left  to  right,  with  the  shorter  string  being  extended,  if 
necessary,  to  the  right  with  blanks.  The  normal  360  collating 
seguence  will  be  used  in  comparing  characters.  The  result  of  a 
string  relation  will  be  a  Boolean  value  (TRUE  or  FALSE). 

The  assignment  operator  in  an  expression  takes  as  its  left 
operand  a  var,  i.e.,  a  reference  entity  which  specifies  a  variable 
name.  Its  right  operand  can  be  any  expression.  The  value  of  an 
expression  e_1  -  e_2  is  the  value  of  e_2,  and  as  a  side  effect 
that  value  is  also  assigned  to  e_1.  Note  that  a  in  an 
expression  takes  as  its  left  operand  only  that  entity  immediately 
to  its  left,  while  its  right  operand  is  the  whole  expression  to 
its  right.  Thus  the  statement 

A  [0  ]  -  At  11  -  B  +  C-  D*E-F  +  G 

will  be  performed  as  if  it  had  been  written 

A  tO  1  -  (AMI  -  Bt(C-D*(E*-F*  G)>) 

Note  also  that  a  in  an  assignment  statement  is  treated 

differently  from  one  in  an  expression  in  that,  it  does  not  produce 
a  result  and  its  right-hand  side  need  not  be  an  expression. 

If  the  sequencing  of  operations  in  an  expression  is  not 
explicitly  specified  by  the  use  of  parentheses,  the  operations 
will  be  ordered  within  it  from  left  to  right,  but  with  the 
following  additional  rules  of  precedence: 
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First: 

~  Hunary)  -(unary) 

Second: 

t 

Third: 

* 

/  *  • 

Fourth: 

♦ 

- 

Fifth: 

< 

<  =  >  >  * 

Sixth : 

♦- 

— 

Seventh : 

A 

Eighth : 

V 

Ninth: 

Tenth: 

o 

Eleventh: 

(as  exp’^ined 

Twelfth: 

IF 

...  THEN  ...  ELSE 

above) 


Thus  the  statement 


X*-A-Bt2/C  +  *D 


will  be  performed  as  if  it  had  been  written 

X  -  ((A  -  (<B  t  2)  /  C>>  ♦  ( *D) ) 

If  a  conversion  of  a  value  to  one  of  different  attributes  is 
necessary,  it  will  automatically  be  performed  by  LCC  as  follows: 

number  *  logic  value:  LCC  will  truncate  the  number  and  strip 
off  its  sign;  the  binary  representation  of  the  resulting 
integer  is  truncated  to  32  bits  to  form  the  logic  value. 
Thus 


-25.7  becomes  ^19 

number  *  string: 

logic  value  string:  LCC  will  transform  the  internal 

representation  of  the  number  or  logic  value  into  its 
external  form  (that  which  would  he  typed  by  an  output 
statement).  That  external  form  will  be  the  body  of  the 
resulting  string.  Thus 

-25.7  becomes  '-25. 1* 

^FF12  becomes  '^OOOOFF^' 

logic  value  ♦  number:  LCC  will  use  the  logic  value  as  the 
low-order  32  bits  of  the  positive  integer  result.  The 
other  bits  of  the  result  will  be  zeros,  and  thus  its  value 
will  be  between  0  and  2t32  -  1.  As  an  example 

,$2F  becomes  47 

string  -  number: 

string  ♦  logic  value:  LCC  will  translate  and  evaluate  the 
expression  which  is  the  body  of  the  string.  This  must 
yield  another  value  (possibly  again  a  string)  which  may 
need  another  conversion,  etc.  Thus  if  H  =  'B',  B  =  3, 
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B3  =  42.1,  then 

*A  a  b#  becomes  42.1 


extractor  ::=  |  e_1  :  <  e  2  >  | 

I  :  | 


If  an  entity  has  a  loqic  or  string  value,  it  may  be  followed 
by  an  extractor,  which  will  select  a  portion  of  that  value  for  use 
as  a  primary.  An  extractor  must  have  one  of  the  forms  listed 
above,  where  e_1  and  e_2  are  expressions  which  evaluate  to 
integers,  and  1  <k  e_1  <  e_2  5  N  (N  is  the  number  of  bits  or 
characters  in  the  original  entity  value).  If  e_1  is  missing,  it  is 
assumed  to  be  1;  if  e_2  is  missing,  its  assumed  value  is  N.  Note 
that  an  extractor  can  follow  any  operand  or  parenthesized 
expression;  it  is  not  restricted  to  variables. 

A  loqic  value  is  a  guantity  whose  32  constituent  bits  are 
numbered,  starting  with  1,  from  left  to  right.  When  a  subfield  is 
extracted  from  a  logic  value  LV,  the  result  is  a  logic  value 
consisting  of  those  bits  of  LV  with  indices  from  e_1  to  e_2 
inclusive,  right  justified  in  a  field  of  zeros.  Thus  if 
LV  =  ^FFOOFFOO,  then 

LV  [5:12]  =  *000000F0  (=  ^FO) 

The  constituent  characters  in  a  string  are  also  numbered, 
starting  with  1,  from  left  to  right.  When  a  substring  is  extracted 
from  a  string  SV,  the  result  is  a  string  consisting  of  those 
characters  of  SV  with  indices  from  e_1  to  e_2  inclusive.  Thus  if 
SV  =  'POPCUPTNE',  then 

SV  [6:  1  =  'PINE* 

If  an  extractor  follows  a  subscript,  the  character  pair  *](' 
may  be  replaced  by  the  single  character  A  value  may  not  be 

extracted  from  an  extracted  value,  and  thus  it  is  an  error  to 
follow  one  extractor  with  another. 

Examples: 

YELLOW [3:101  o  RED 
QC3,  NN,  I : Jl  -  PI:  18] 

(A  ♦  B  ♦  C) [5:8] 

P(X,  T+1)  [35,  14 ]  (23 : ] 


p 
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for-clause  <|FOR  ident  <|FROM|e>|>  <|BY  e  CTO  e>|>  CHHILE  e>  DO 

|  |-  |  |  |TO  e  <BY  e> | 

| FROM  e  | 

See  the  iteration  (FOP)  statenent  description  on  paqe  12  for 
an  explanation  of  the  control  exercised  by  a  for-clause. 

Examples: 

FOR  I  FROM  1  BY  G  TO  H  WHILE  M3  DO  S 

TYPE  P, (FOR  I  TO  10  DO(FOR  J  TO  5  DO  C(I,J]),FlI]) 


group 


|  PART  |  <  num  <  TO  nun  >  >  | 


|  PARTS  |  i 

|  STEP  |  I 

|  STEPS  |  | 

num  <  TO  num  >  j 


A  group  is  a  specification  of  a  step  or  a  contiguous  se-  of 
steps.  A  single  step  is  normally  specified  by  the  keyword  'STEP' 
followed  by  a  num,  but  if  the  group  scanner  finds  a  num  without  a 
preceding  keyword,  it  will  assume  the  presence  of  the  word  'STEP'. 
A  set  of  steps  is  specified  as  one  of 

STEP  num  TO  num 
STEPS  num  TO  num 

or  merely  as 

num  TO  num 

A  pact  or  set  of  parts  is  similarly  specified  as 

PART  num 

or  as  one  of 

PART  num  TO  num 
PARTS  num  TO  num 

(the  keywords  'PART'  and  'PARTS'  cannot  be  omitted). 

In  scanning  for  a  group,  as  well  as  everywhere  else  in  LCC, 
the  translator  always  considers  the  keyword  'STEP'  equivalent  to 
'STEPS'  and  the  keyword  'PART'  equivalent  to  'PARTS'.  Thus,  for 
example,  you  can  write 

DISPLAY  PARTS  6 
DELETE  STEP  4.7  TO  5.3 
IF  A  <  B  THEN  PARTS  6 
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Whenever  the  construction  'num_1  TO  num_2'  is  used  in  LCC,  you 
must  have  num_1  £  num_2,  unless  nura_2  <  1,  in  which  case  LCC  will 
increment  it.  by  the  integer  portion  of  nuin_l.  Thus,  for  example, 

DISPLAY  STEPS  3.6  TO  .  9 

is  equivalent  to 

DISPLAY  STEPS  3.6  TO  3.9 

Examples: 

ALTER  STEP  1.6  :  'X'  *  'AX'  ,  'Y'  *  'BY' 

COPY  PART  3  AS  43 
•STEPS  4.5  TO  4.73* 

NUMBER  7.7  TO  8.2  AS  2S  BY  .02 


digit  ::=  |  0  |  1  |  2  |  3  |  4  |  5  |  6  |  7  |  8  |  9  j 

letter  |A|B|C|D|B|P|G|H|j:|J|K|L|II|V|O|P|0|R|S|T|U|V|H|X|Y|Z| 

|a|b|c|d|e|f|g|h]i|j|k|l|m|n|o|p|q|r|s|t|u|v|w|x|y|z| 

ident  ::  =  letter  <  h  |  diqit  |  H  ...  > 

J  letter  j 
}»-_-<  I 


Identifiers  (idents)  are  used  to  name  entities  in  LCC.  An 
identifier  consists  of  a  sequence  of  one  or  more  letters,  digits, 
and/or  underline <_)  characters,  the  first  of  which  must  bo  a 
letter.  Some  identifiers  are  keywords  in  LCC  and  are  reserved  for 
that  purpose;  you  cannot  use  them  as  names.  Others,  such  as  the 
names  of  the  standard  functions  (see  Appendix  H)  and  the  other 
built-in  LCC  functions  and  procedures  (see  Appendix  I)  are 
privileged  identifiers  in  the  sense  that  they  are  qiven  meanings 
when  LCC  is  initialized.  You  may  use  a  privileged  identifier  as  a 
variable  name  by  declaring  it,  but  if  you  do,  its  original  meaning 
will  be  superseded  and  may  be  lost. 

Even  though  an  identifier  can  be  arbitrarily  long,  LCC  will 
retain  only  its  first  (leftmost)  8  characters,  with  all  other 
characters  being  ignored.  Thus  identifiers  must  be  uniquely 
distinguishable  within  their  first  eight  characters. 

Examples: 

X 

RED 

ALGOL_60 

RUMPELSTILTSKIN 
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hex-digit  ::=  |  digit  |A|B|C|D|E|F| 

logic-literal  ::  =  |  FALSE  | 

j  TRUE  j 

I  >C  <  I  L  |  >  H  hex-digit  H  ...  | 

I  1  R  I  I 


A  logic- literal  in  LCC  is  written  either  as  a  hexadecimal 
value  or  as  one  of  the  Boolean  values  'TRUE*  or  'PAL3E'.  The  16 
hexadecimal  digits  are  specified  by  the  decimal  digits  0  through  9 
and  the  letters  A  through  Pr  with  the  'digits*  10  through  15  b >ing 
represented  by  the  letters  A  throuqh  P  respectively.  A  logic  value 
is  represented  in  LCC  as  a  32  bit  quantity;  therefore  a 
logic-literal  can  contain  up  to  8  hex-digits,  which  must  be 
contiguous,  i.e. ,  imbedded  blanks  are  not  allowed.  The  optional 
letters  'L#  and  %R'  in  a  hexadecimal  literal  indicate  left  and 
right  justification  respectively.  If  neither  letter  is  pres<~"t,  an 
*R'  will  be  assumed.  Thus 

^LFBi  =  ^FBIOOOOO 

The  Boolean  values  are  equivalent  to  hexadecimal  values  as 
follows: 


FALSE  =  ^ 0  (32  binary  zeros) 

TRUE  *  ^ FFFFFFFF  (32  binary  ones) 

Note,  however,  that  when  tested  in  an  IP  clause,  any  non-zero 
value  will  be  considered  to  have  the  quality  'true*.  Thus  the 
statement 

TYPE  IP  *123  THEN  'T'  ELSE  %F' 
will  print  'T',  even  though  ^123  *  TRUE. 

Examples: 

PALSE 

^9AB7 

i(LPF 


num  ::=  |  int  H  .  H  int  j 

I  ident  j 

j  (  e  )  I 


A  num  is  used  to  specify  the  number  of  a  step  or  a  part.  rt 
will  usually  be  a  decimal  number,  i.e.,  a  number  without  an 
exponent.  However,  it  nay  also  be  an  ident.  whose  value  is  a  step 
number,  or  a  parenthesized  expression  which  evaluates  to  a  step 
number. 
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A  part  or  step  cannot  have  a  negative  number;  therefore  LCC 
will  take  the  absolute  value  of  each  evaluated  nura  before  using 
it. 

Examples: 

STEP  1420. IS 
PART  (J  ♦  2) 

DELETE  STEPS  A  TO  B 


int  ::=  t-  digit  H 
number-literal  ::= 


!  |  int  <  H  .  -I  <  int  > 
j  j  H  .  H  int 
i  ■  <  I  +  I  >  int 
I  I  -  I 


♦|  >  int  >  | 

-  I  I 

I 
I 


A  decimal  arithmetic  constant  in  LCC  is  written  as  a 
number- li feral.  A  number-literal  is  a  sequence  of  digits,  possibly 
including  a  decimal  point,  optionally  followed  b/  an  exponent 
part.  An  exponent,  part  consists  of  the  delimiter  character  * 
followed  by  an  optionally  signed  decimal  exponent.  As  a  special 
casr  .  if  the  base  value  of  a  number  is  to  be  1,  the  number-literal 
can  .>o  written  using  only  an  exponent  part.  Thus 


„-15  =  1„-V 

Blank  spaces  are  not  allowed  within  a  number-literal;  thus  3.7  „-5 
and  14  are  illegal. 

Numeric  values  will  be  stored  by  LCC  as  lonq  (double  word) 
floating-point  System/360  quantities.  This  allows  a  precision  of 
about  17  decimal  digits,  though  for  output  LCC  will  usually  round 
a  number  to  10  digits.  The  maximum  absolute  value  of  a  number  is 
approximately  7.237„75;  the  minimum  non-zero  absolute  value  is 
approximately  W-7S. 


IS 

7.36 

.2S 

6.2„-r' 

1  38. 


Examples: 
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operand  ::=  j 

BEGIN  h  s  H  .;.  END 

1 

CASE  e  OF  (  1-  e  H  . , .  < 

,  OTHERWISE  e  >  ) 

1 

PART  num  <{  1-  s  -t  .  ;  . 

>  > 

1 

|  STEP  |  num  <  TO  num  > 

1 

|  STEPS  j 

1 

ident 

1 

logic-literal 

1 

number- literal 

1 

string- literal 

1 

var  <  (  <  H  |  e 

|  H  .,.  >  )  > 

1 

j  pointer 

1 

1 

|  procedure 

1 

1 

?  <  $  >  <  string-literal  > 

<  ident  > 

1 

!  e 

1 

{  1-  s  -f  .  ;  .  ) 

1 

m  group  " 

Most  of  the  operands  are  described  individually  below 
(starting  on  page  46).  For  ident  and  logic-,  number-,  and 
string- litera 1,  see  the  descriptions  of  the  individual 
metavariables.  For  the  part  call  and  the  var  call,  see  the 
descriptions  of  the  corresponding  statements. 

An  LCC  operand  may  be  characterized  most  simply  as  an  entity 
which  returns  a  result;  a  statement  is  an  entity  which  does  not 
return  a  result.  In  many  cases,  operands  and  statements  look  alike 
(e.g. ,  a  part  or  step  call,  a  procedure  call,  a  block)  and  the 
distinction  between  them  must  be  made  by  context  or  it  may  have  to 
be  made  dynamically  during  execution. 


pointer  ::=  ■»  varid 


A  pointer  is  used  to  indirectly  reference  an  incarnation  of  a 
variable.  It  is  thus  an  object  which  acts  as  an  alias  for  the 
object  to  which  it  points.  Whenever  a  variable  containing  a 
pointer  is  used  in  an  expression  or  an  assignment,  the  object  to 
which  it  eventually  points  will  ae  accessed  or  modified,  not  the 
original  variable  or  the  pointer.  A  pointer  may  point  to  another 
pointer,  and  thus  we  may  have  pointer  chains.  A  pointer  chain  must 
end  at  a  non-pointer  (cycles  will  not  be  allowed)  and  it  is  that 
final  element  to  which  any  pointer  in  the  chain  refers.  As  an 
example,  after  we  execute  the  statements 

A  -  =»B;  3  -  aC r  C  -  17 

the  value  of  A  +  B  ♦  )  will  be  35.  If  we  then  execute  the 

assignment  statement 


A  -  'FISH* 
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the  value  of  C  will  be  changed  to  the  string  'FISH'. 

Pointers  may  be  assigned,  RPTURNed,  or  passed  as  actual 
parameters.  Their  main  uses  are  to  construct  list  structures  or  to 
refer  to  particular  incarnation- values  which  sight  otherwise  he 
unavailable  in  inner  blocks  of  a  program.  Moreover,  if  a  procedure 
is  to  store  a  result  into  a  variable  which  is  to  be  passed  to  it 
as  a  parameter,  that  parameter  must  not  be  the  variable  name  but 
rather  a  pointer  to  i 

Examples: 

T 10 , 61  -  =»Z 
NEW  PTR  -  otf,  Q  -  h 
RET  (IRN  ^AR3t2, 1,-41 
PF(  5,  =  X,  N) 


primary  :  :=  |  operand  |  <  t  |  extractor  |  1  > 

I  (  e  )  |  j  subscript- list  <  |  1 t  |  extractor  >  j 

!  I  *  I  I 


A  primary  begins  with  either  an  operand  or  an  expression 
enclosed  in  parentheses,  and  it  may  be  optionally  followed  by  a 
subscript-list  and/or  an  extractor.  A  primary  is  a  value  entity 
(numeric,  logic,  string)  as  distinguished  from  a  reference  entity 
(label,  procedure,  array  name,  pointer),  though  this  distinction 
canuot  be  checked  by  LCC  until  the  primary  is  executed. 

Exa mples: 

XlCOLOR,  SIZE,  VT-2] 

GREEN 

YELLOW  [133:  10] 

Q 13 1  INI IIsJl 

(A  ♦  R  -  C) [5,  : 10] 

FN( A, B)  ICl 


procedure  ::=  v  <  (  h-  ident  H  )>|o  |  * 

|  t-  s  H  .;.  | 


The  procedure  bodv  is  the  expression  e  or  the  statement  list* 
and  the  listed  idents  are  formal  identifiers  in  that  body,  when 
th»  procelure  is  called,  actual  parameters  must  be  supplied  to 
replace  the  formal  identifiers  during  execution  of  e  or  t.he 
statement  list.  For  a  procedure  with  no  parameters,  the  formal 
identifier  list  may  be  omitted  (s?e  the  description  of  the 
procedure  assignment  statement  on  page  26). 
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Examples: 

PROC  -  v(F,G)  F  *■  G  *  Hv 
G  «-  V  PART  81  C  NEW  7  -  «  ♦  1;  NEW  Q  >  v 


|  statement  | 
|  ident  :  s  j 


Any  statement  In  a  delayed  step  may  be  preceded  by  one  or  more 
label  identifiers  which  name  that  statement  and  allow  other 
statements  to  branch  or  *G0*  to  it.  Labels  are  not  usually 
necessary,  because  step  numbers  can  also  be  used  as  transfer 
points  for  GOTO's,  but  they  are  useful  for  naming  statements 
within  a  step  or  for  naming  statements  in  a  part  or  group  which  is 
to  be  renumbered. 

Labels  do  not  always  work  correctly  in  LCC,  and  at  present 
there  are  some  situations  which  must  be  avoided.  The  known 
incorrect  cases  (as  of  October  24,  1469)  are  listed  below. 

1.  Labels  in  steps  called  via  step  calls  (as  in 

STEPS  3.7  TO  3.9)  do  rot  work  correctly  and  if  used  will 
usually  lead  to  errors  later  on  in  your  conversation. 

2.  Labels  in  a  (BEGTN-SND)  block  statement  or  expression  do 
not  work  correctly  and  the  errors  they  lead  to  will  not 
normally  be  caught  by  LCC. 

1.  If  a  step  containing  labelled  statements  is  added  to  an 
active  part,  the  labels  will  not  be  declared  during  the 
current  activation  of  that  part.  In  future  activations, 
however,  they  will  operate  correctly. 

4.  Labels  in  the  statement  list  of  a  procedure  or  inside  the 
braces  of  a  part  call  do  not  work  correctly  and  will 
normally  be  ignored  by  LCC. 


Examples: 


3.7:  A :  3*3 

13.452,  I  •  I  ♦  1;  L:  B:  J  *•  J  ♦  1 
F:  G:  H:  K  *-  J  ♦  1 
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save-object  ::=  j  ALL 

|  PARTS 
j  STEPS 
j  VALITES 


!  < 

PART 

1  >  *- 

num  <  TO  num 

>  H  .,. 

I 

1 

PARTS 

! 

1 

1 

STEP 

I 

1 

I 

STEPS 

! 

I 

|  f-  varid  H 

•  9  • 

1 

.A  save-object, 

which  may 

be  either 

SAVEd, 

DELETEd 

DTSPLAYed,  can  be  a  set  of  continuous  steps  (as  in  a  group),  a 
list  of  sets  of  steps  or  parts,  a  list  of  the  meanings  associated 
either  with  selected  variables  or  with  all  the  variables  in  your 
program  (VALUES),  or  a  combination  of  all  of  your  steps  and  all  of 
your  values  (ALL).  As  in  a  group,  if  the  word  'PART'  or  'STEP'  is 
missing  before  a  nua  in  a  save-object,  the  word  'STEP'  will  be 
assumed.  Note  that  if  a  save-object  begins  with  an  identifier, 
that  identifier  will  be  treated  as  the  first  such  in  a  varid  list 
rather  than  the  first  num  in  a  step  list. 

Examples: 

DISPLAY  VALUES 
DISPLAY  X,  Y,  Z [4, J) 

DELETE  STEPS  4.6,  7.1  TO  10.6,  15.3,  4.8902 
SAVE  PARTS  45  TO  493  AS  *ILE  'CAT' 


statement 


See  the  descriptions  of  the  individual  statements,  starting  on 
page  3. 


string-character  ; 


string-literal  :  :  = 


|  any-CHU-character-but-a-guote  | 

I  "  I 

I  "  t 

'  <  I-  string-character  H  ...  >  ' 


A  string-literal  in  LCC  is  written  as  a  sequence  of  zero  or 
more  string-characters  enclosed  within  left  and  right  single-quote 
characters.  The  legal  string-characters  are  the  88  characters  on 
the  *CMU  Type-Ball' 


J 
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!V3$j****n  ? 

1234567890-  + 

QNERTYUIOP* 

-*'<>[  1  (  )  :  - 
ASDFGHJKL;- 

ZXCVBNM,./ 

plus  the  26  lover  case  letters  and  the  space  (blank)  character.  In 
order  to  avoid  ambiguity,  you  must  type  in  two  successive  left  or 
right  single-quote  characters  to  get  ore  inside  your  string.  Thus 
if  you  execute  the  step 

S  -  %  AB"  "CD"'  ;  TYPE  S 

LCC  will  type  back  the  value 

AB"CD' 

which  is  the  body  of  S.  An  exception  to  this  rule  is  the  treatment 

of  a  strinq  body  which  is  typed  in  response  to  a  string  read  (?$) 

request.  Single-quotes  need  not  be  doubled  to  appear  in  such  a 
strinq. 

The  lower  case  1 .tters  cannot  be  typed  out  at  your  terminal  by 

a  CMU  type-ball,  although  they  can  be  printed  by  the  line  printer 

in  the  computer  room  (via  a  PRINT  statement).  A  lower  case  letter 
can  he  typed  in  from  your  terminal  by  preceding  the  corresponding 
upper  case  letter  by  a  vertical  bar  (j)  which  acts  as  an  ^escape 
character*.  Thus  the  string 

' | AB)C) D| EPGH * 

will  be  printed  on  the  printer  as 
aBcdeFSH 

Lower  case  letters  will  be  typed  out  on  your  terminal  as  their 
upper  case  equivalents.  Thus  the  above  string  would  be  typed  as 

ABCDEFGH 

Because  of  the  use  of  the  vertical  bar  as  an  escape  character, 
you  must  always  type  two  successive  vertical  bars  to  get  one  into 
your  string.  Thus  if  you  type  in 

'IMMMIMI' 

LCC  will  type  back  the  string  body 
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l*l“l  H-l 

Other  than  for  lover  case  letters,  you  will  not  need  to  use  escape 
characters  with  the  regular  CMU  type-ball.  Escape  characters  will, 
however,  be  necessary  if  you  use  some  other  type  ball  or  if  you 
use  a  teletype  for  your  conversation  with  LCC,  but  these  uses  will 
not  be  described  here. 

Examples: 

'BLUE' 

'ABC'  o  'DEF'  o  S 

!  'A  -  B  ♦  C;  v  TRANSLATE  THIS  LATER  ' 


structure  ::=  ARRAY  £  He<:e>H  .  |  ][  |.  1 

I  *  ) 


A  structure  specifies  the  dimension  and  the  subscript  bounds 
which  are  to  he  assigned  to  •*.  given  var,  thus  malting  that  var  into 
an  array.  See  the  var  *-  A1  AY  .  .  .  statement  on  page  27  for  a 
more  complete  description. 

Examples: 

LA  -  ARRAY [1:N,  -3  :  8*K] 

NEW  A  -  ARRAY  £3, Os  5  ] ,  I),  C  *  26,  D  *■  ARRAY  £X;Yl 
A £B,C]  *  ARRAY  £1:5] £0:61 


subscript-list  h  e  H  .  |  ]£  |. 

I  »  I 


Any  array  designator  (an  array  name  or  a  reference  to  an 
array)  may  be  followed  by  a  subscript-list,  which  will  select  an 
element  from  the  array.  Each  expression  in  the  subscript-list  will 
he  evaluated  to  a  number,  rounded  to  an  integer,  and  used  as  an 
index  to  obtain  a  constituent  from  the  array,  with  the  validity  of 
the  indexing  being  determined  dynamically.  The  selected 
constituent  element,  may  again  be  an  array,  and  the  subscription 
process  may  then  be  repeated.  When  multiple  subscripts  are  used, 
any  character  pair  ']£'  may  be  replaced  by  the  equivalent  single 
character  ','. 

Examples: 

X (COLOR ,  SIZE,  WT-21  ♦  Y£3] 

?<A,B*1>  £  1]  £  J]  -  D£1,2]£31  /  K 
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empty  ::=  (i.e.,  the  null  string  of  characters) 

type-object  ::=  J  e  | 

|  empty  | 

|  (  for-clause  H  type-object  H  .,.  )  j 


See  the  description  of  the  TYPE  statement  (page  23). 
Examples: 

TYPE  CHI,  ,  DEF  ♦  1,  'STR' 

WRITE  (FOR  I  TO  100  DO  All],  Bill)  AS  'FILE6' 
TYPE  (FOR  I  TO  10  DO  (FOR  J  TO  10  DO  A(IfJ])) 


var  ::=  1  operand  |  <  t  subscript- list  1  > 

1(e)  1 


A  var  begins  with  either  an  operand  or  an  expression  enclosed 
in  parentheses,  and  it  may  be  optionally  followed  by  a 
subscript-list.  A  var  must  be  a  reference  entity  which  specifies  a 
variable  name,  though  LCC  cannot  check  whether  or  not  the  var  is  a 
reference  until  it  is  executed. 

Examples: 

pm  A  ♦  ( B  ♦  B  ♦  1)  ♦  H (N) 

I  -  J  ~  K  ~  w 
(A  +  B)  tCllDl  -  3 
(?P)[QJ  -  5 
HlJ](1,2)  13,4]  '5)  -  6 


varid  ::=  ident  <  [  subscript- list  J  > 


A  varid  is  an  identifier  optionally  followed  by  a 
subscript-list,  i. e. ,  a  varid  is  the  designator  of  a  variable. 
Expressions  in  the  subscript-list  may  be  separated  from  one 
another  either  by  a  comma  or  by  the  character  pair  ']['  (i.e.,  a 
subscripted  varid  is  also  a  varid,  which  may  again  be 
subscripted) . 

Examples: 

ND  -  =AHCTfJ] 

A  tB  HC] 

?  A 1 ,  32(3,  JM],  C,  D(KH9] 
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BEGIN  b  S  H  END 


The  keywords  'BEGIN'  and  'END'  delimit  a  "block*,  whose  list 
of  arbitrary  LCC  statements  will  be  treated  as  if  it  were  in  a 
part,  i.e.,  there  may  be  local  variables  valid  only  within  it.  LCC 
will  perforin  a  block  entry,  after  which  it  w„ll  execute  the 
statements  from  the  list  in  sequence.  This  "block  expression"  will 
normally  he  terminated  by  a  RETURN  statement  which  supplies  a 
value.  Such  a  RETURN  will  terminate  the  block  context,  and  the 
returned  value  will  be  used  as  that  of  the  operand.  A  RETURN 
statement  without  a  value  will  first  terminate  the  context  of  the 
Mock  expression  and  then  return  from  the  context  in  which  the 
block  is  embedded. 

Examples: 

X  -  Y  *  BEGI*  NEW  A;  PART  6;  RETURN  A  END  -  Z 


CASE  e  (  e_1  ,  e_2  ,  ...  ,  e_N  ) 


The  expression  e  is  evaluated  and  rounded  to  an  integer  K.  If 
1  <  K  <  N,  the  value  of  this  CASE  expression  is  the  value  of  e_K. 
It  is  an  error  if  K  is  out  of  the  range  1  to  N . 


CASE  e  0?  (  e_1  ,  <»_2  ,  ,  e_N  ,  OTHERWISE  e_(N+1)  ) 


This  statement,  operates  like  the  ordinary  CASE  expression 
above  except  if  K  is  out  of  the  range  1  £  K  <  N,  the  value  is 
e_(N+  1)  . 

Examples: 

G  -  CASE  I-J  OF  (A,  B+1,  C-D,  OTHERWISE  E/6)  *  H 


STEPS  num_1  TO  num_2 


As  in  a  group,  num_1  must  be  <  num_2  (unless  num_2  <  1).  LCC 
will  set  up  a  new  group  context  (non-block)  for  the  sequence  of 
steps  from  num_1  to  num_2.  Execution  will  then  begin  at  step  num_1 
and  it  will  continue  through  successively  higher  numbered  steps. 
The*  context  for  this  step  group  operand  will  normally  be 
terminated  by  a  RETURN  statement,  whose  result  will  be  the  value 
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of  the  operand.  It  is  an  error  for  the  group  to  return  without  a 
value.  An  EXIT  statement  will  terminate  the  step  group  context  and 
return  control  to  you  in  the  context  of  its  calling  group. 

Note  that  there  is  a  possible  syntactic  ambiguity  when  a  step 
group  operand  is  used  inside  an  iteration  clause.  An  example  is 
the  statement 

FROM  STEPS  3.5  TO  3.8  BY  2  DO  PART  8 

In  anv  such  ambiguous  cases,  the  Keyword  'TO'  will  always  be 
associated  with  the  step  call  rather  than  with  the  iteration 
c la  use . 

Examples: 

H  -  X  -  STEPS  5.3  TO  5.46 


STEP  num 


Equivalent  to  the  operand 
STEPS  num  TO  num 


Examples: 


TEMP  -  STEP  1420.35  *  Z 


o 


If  LCC  encounters  a  question  mark  as  an  operand,  it  will  type 
a  message  and  give  control  to  you.  You  must  then  type  an 
expression  and  return  control  (by  pressing  the  RETURN  key).  The 
typed  expression  will  be  translated  and  evaluated,  and  its  result 
will  bo  the  value  of  the  operand.  Note  that  the  typed  expression 
may  involve  your  program  variables,  whose  current  meanings  will  be 
used  in  its  evaluation. 

Examples: 

¥*?*♦?♦  ?* LENGTH'  LNG  +  ?$ 'READ  STRING' 


?  string- literal 


This  operand  performs  like  a  simple  ?  operand  except  LCC  will 
type  out  the  user-supplied  message  string  instead  of  the  system 
message. 
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LCC  Operands 


Examples: 

T  -  ?  'TTflE' 


?  <  string-literal  >  varid 


This  operand  is  equivalent  to  one  of  the  expressions 
(varid  -  ?) 

(varid  *•  ?  string-literal) 

Varid  must,  he  an  optionally  subscripted  variable  identifier.  You 
will  be  asked  for  a  value  as  for  the  simple  ?  operands  described 
above.  That  value  will  be  assigned  to  varid  before  being  used  as 
the  value  of  the  operand. 

Examples: 

X  -  ?Y  -  3  *  ?WZ 


?  *  <  string-literal  >  <  varid  > 


This  operand  is  the  same  as  an  ordinary  ?  operand  except  LCC 
will  treat  your  typed  response  as  the  body  of  a  string  (i.e.,  it 
will  surround  the  characters  which  you  typed  with  guote  marks). 
Thus  the  value  of  a  ?S  operand  will  always  be  a  string.  As  an 
example,  if  you  respond  with  the  character  sequence 

ALPHA  ♦  BETA 

to  LCC's  request  for  the  operand  ?$PQ  in  the  statement 
T  -  S  °  ?$PQ 

the  effect  will  be  to  perform,  in  order,  the  assignments 

PQ  «-  'ALPHA  ♦  BETA'; 

T  -  S  □  ' ALPHA  ♦  BETA'; 

A  slight  variation  is  possible  here  in  the  use  of  single-quote 
marks,  which  need  not  be  doubled  to  appear  in  your  requested 
string  body.  Thus  if  you  were  to  type 

in  response  to  the  above  request  for  ?$  PQ,  the  effect  would  be  to 
perform  the  assignment 

PQ  -  *  B"  *  "7 


* 


LCC  Operands 
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Examples: 


G  -  ?$  'INPUT  N'  EN  o  EM 


; 


e 


The  expression  e  must  evaluate  to  a  string,  whose  contents 
will  be  treated  as  expression  data  to  the  LCC  translator.  When  a  ! 
operand  is  executed,  the  string  which  it  supplies  will  be 
translated  and  converted  to  a  value.  That  value  will  then  be  used 
as  the  value  of  the  operand.  Thus  an  operand  1ST,  where  ST  has  a 
string  value,  has  the  same  effect  as  the  expression 

(ST  ♦  0) 

which  forces  the  value  of  ST  to  be  converted  from  a  string  to  a 
number  before  the  addition  can  be  performed. 

Examples: 

XY  -  FP ( l-SIN(Z) ,  ! P)  ♦  3 


{  t-  s  H  • ;  .  } 


LCC  will  treat  the  statement  sequence  from  this  ^compound 
expression*  as  a  single  control  unit  whose  sub-statements  will  be 
executed  sequentially  from  left  to  right.  A  compound  expression  is 
not  a  block  and  does  not  have  its  own  local  variables.  It  will 
normally  be  terminated  hy  a  RETURN  statement,  whose  value  will  be 
the  value  of  this  operand.  A  RETURN  statement  without  a  value  will 
first  terminate  the  context  of  the  compound  expression  and  then 
return  from  the  context  in  which  that  expression  is  embedded. 

Examples: 

YZ5  -  T  ♦  (  FOR  K  TO  N  DO  F(K, L, N) ;  RETURN  K  }  /  2 


*  group  * 


The  value  of  this  operand  is  a  string  consisting  of  the  text 
of  the  specified  group.  That  string  will  contain  only  t.h«.  source 
text  for  a  step  —  not  its  number.  If  the  group  includes  more  than 
one  stem,  the  strings  for  the  individual  steps  will  be 
concatenated  in  step-number  order  to  form  the  operand,  with  no 
semicolons,  blanks,  or  any  other  characters  being  inserted  between 
successive  text  strings. 


so 


LCC  Operands 


Examples: 


S  -  * ST  EPS  4.5  TO  4.73* 
!  *14.301" 


*STEP  6. 1 


Appenuix  A 
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-  Explanation  of  Syntax  Notation  - 

<  > 

Optional  presence  —  These  delimiters  surround  a  construct 
which  may  either  be  present  or  absent. 

I  I 

Alternatives  —  These  delimiters  surround  a  set  of 
alternatives,  one  and  only  one  of  which  must  be  present. 
The  alternatives  are  usually  listed  vertically,  but  for  a 
few  metavariables,  such  as  "digit*  and  "letter*,  where 
there  are  many  alternatives,  they  will  be  listed 
horizontally  and  separated  from  one  another  by  |  j 
delimiters. 

h  H 

Grouping  —  These  bracketing  delimiters  are  used  fo-  grouping 
only. 


.|  H  |. 

I  *  I 

Repetition  —  The  immediately  preceding  syntax  construct, 
which  will  be  surrounded  by  I-  -I  brackets,  may  be 
optionally  repeated  a  number  of  times,  with  the  construct 
between  the  dots  (a  comma,  a  semicolon,  or  either  a  comma 
or  the  character  pair  'll')  being  used  to  separate  the 
individual  constructs.  Thus  the  notation 

He  H  . , . 

could  mean  any  of  the  following 

e  ,  e  ,  e  ,  e 
e 

e  ,  e 


Repetition  —  The  immediately  preceding  construct  may  be 
optionally  repeated  a  number  of  times,  with  no  separators 
(or  spaces)  between  the  individual  constructs. 


This  separator  aay  be  read  'is  defined  to  be'.  It  is  used  in 
the  same  sense  as  in  Algol  60  syntax  notation  (8NF)  for 
defining  LCC  metavariables. 
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Tn  the  syntax  descriptions,  lower-case  words  or  phrases  are 
used  to  name  metavariables.  As  used  here,  a  metavariable 
is  a  description-language  variable  which  is  used-  to 
simplify  the  description  of  LCC.  A  metavariable  is  not 
itself  an  LCC  construct,  but  it  is  defined  (often 
recursively)  in  terms  of  LCC  elements.  Whenever  a 
metavariable  is  used  in  the  syntax  description  of  LCC,  it 
must  be  replaced  by  a  set  of  LCC  characters  satisfying  its 
definition  in  order  to  obtain  a  valid  LCC  construct.  As  an 
example,  the  metavariable  "digit*  can  be  any  of  the  atomic 

characters  0  or  1  or  2  or  3  or  4  or  5  or  6  or  7  or  8  or  9. 

The  upper  case  words  used  in  the  syntax  are  primitive  LCC 
elements  which  must  be  used  (and  spelled)  exactly  as 

written  (except  for  the  equivalent  LCC  words  'PART'  and 

'PARTS',  which  may  be  used  interchangeably,  and  'STEP'  and 
'STEPS',  which  may  also  be  interchanged).  These  primitive 
"keywocds*  are  reserved  identifiers  in  LCC,  and  they  may 
not  be  used  to  name  variables.  The  current  LCC  keywords 
are  the  following: 


ALL 

NEW 

ALTER 

NUMBER 

ARRAY 

OF 

AS 

OFF 

BEGIN 

OTHERWISE 

BY 

PART 

CASE 

PARTS 

COMBINE 

PAUSE 

COPY 

PRINT 

DELETE 

PUNCH 

DISPLAY 

READ 

DO 

RECOVER 

ELSE 

RETURN 

END 

SAVE 

EXIT 

SHARE 

FALSE 

STEP 

FILE 

STEPS 

FOR 

THEN 

FORM 

TO 

FROM 

TRUE 

GO 

TYPE 

GOTO 

USE 

IF 

VALUES 

IN 

WHILE 

LINE 

WITH 

LOAD 

WRITE 
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LCC  Syntax 


binary-operai-or  ::=  |»jt  |*|/|  *|«  |  +  j- |<|<|  =  |>|>|*|**-|-*-*|a|v  |  =  |o| 


digit  ::=  |0|1|2|3|4|5|6|7|8J9| 


e  :;=  |  primary  | 

j  unary-operator  e  j 

|  e  binary-operator  e  j 

|  IP  e  THEN  e  LLSE  e  | 


empty  ::=  (i.e.,  the  null  string  of  characters) 


extractor  ::=  |  e  s  <  e  >  | 

|  :  e  j 


f or-clause 


;:=  <| FOR  ident 

I 

| FROM  e 


<| FROM |  e  >|>  <|BY  e  <  TO  e  >|>  <WHILE  e>  DO 
|-  j  j  |TO  e  <  BY  e  >j 
1 


group 


|  PART  |  <  nua  <  TO  num  >  > 
|  PARTS  I 
|  STEP  J 
|  STEPS  j 
nua  <  TO  num  > 


hex -dig  it 


|  digit  |A|B|C|D|E|F| 


ident  : letter  <  »-  J  digit  |H  ...  > 

j  letter  j 
I  l-.H  I 


ir.t  :  digit  -i  ... 


letter  ::=  |A|B|C|D|  E|F| G| H|I| J| K| 1| H|N|0| P( Q|B |S |T|0 |V |B | X | Y |Z | 

|a|b|c|d|e|f|g|h)i|j|hfl|D(n|o|p|g!r|s|t|ujv|w|x|y|z| 
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log  ic-literal 


I  FALSE 
j  TRUF 

j  4  <  |  L  |  >  I-  hex-digit  H 

I  I  8  | 


I 


nun 


I  int  t-  .  H  int  | 
|  ident  S 

|  (  c  )  | 


number-literal  | 

I 

I 

I 


|  int  <  H  .  -I  <  int  >  >  |  < 
|  h  .  H  int  ) 

»<|+|>  int 
I  -  I 


0 


<  |  ♦  |  >  int  >  | 

!  -  I  I 


I 

I 


operand 


BEGIN  b-  s  H  END 

CASE  e  OP  <  b  e  H  <  ,  OTHERWISE  e  >  ) 

PART  num  <f  b  s  H  «>.  >> 

|  STEP  |  num  <  TO  num  > 

|  STEPS  | 
ident 

logic-literal 
number- literal 
string-literal 

var  •  <  (  <  b  |  e  M  >  >  > 

j  pointer  | 

|  procedure  j 

?  <  $  >  <  string-literal  >  <  ident  > 

!  c 

{  b  S  -I  .J.  > 

m  group  * 


pointer  =  =»  varid 


primary  :  :  = 

|  operand 

1 

<  t  |  extractor 

1 

|  (  e  ) 

1 

j  subscript-list 

< 

1 

]  (  |  extractor  >  ) 

1 

1 

,  1  ! 

procedure 

:  s=  »  < 

( 

b-  ident  H  )  > 

1 

e 

1  * 

1 

b- 

s  d  | 

s  :  :=  | 

statement 

1 

! 

ident  :  s 

1 
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save-object 


ALL 
PARTS 
ST  BPS 
VALUES 

<  I  PART  |  >  H  nui  <  TO  nu>  >  H  .  ,. 
|  PARTS  I 
j  STEP  j 
I  STEPS  j 
»-  varid  H  .  #. 


sta tenent 


(see  list  of  statements  starting  on  next  page) 


string-character 


1  any-CHU-character-but-a-quote  | 
I  "  I 
I  "  I 


string-literal 


'  <  l-  string-character  H  ...  >  * 


structure  :s* 


ARRAY  {  h  e  <  :  e  >  -»  .  |  )  l  | .  ) 

I  .  I 


subscript-list 


t-  e  H  .J  H  |. 

I  ,  I 


type-ob  ject 


I  e  I 

I  e»pty  | 

|  (  for-clause  I-  type-object  H  . ,.  )  j 


unary-operator 


I  ♦  I  -  I  »  I  -  I 


var  =  |  operand  |  <  [  subscript-list  ]  > 

I  (  e  >  I 


varid 


ident  <  C  subscript-list  )  > 
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statement  one  of  the  following  syntactic  forms 

ALTER  group  |  s  |  h  e  *  e  H 
I  r  I 

<  NEW  >  ASP  AT  k  H  ident  -I  I  t-  e  <  !  e  >  H  •  |  1C  |  •  1  H 

I  *  I 

BEGIN  t-  s  H  END 

CASS  e  OP  (  I-  s  H  ,j.  <  i  OTHBRWISB  s  >  > 

COMBINE  <  STEPS  >  num  TO  nun  AS  e 

COPY  qroup  AS  e  <  BY  e  > 

DELETE  I  PILE  e  | 

j  Si  'e-object  j 

DISPLAY  |  FILE  <  CATALOG  >  | 

I  EETORN  <  STEPS  >  | 

|  save-object  j 

EXIT  <  |  ALL  I  > 

|  <  TC  >  <  PART  >  e  | 

for-clause  s 

|  GO  <  TO  >  |  <  e  > 

|  GOTO  j 

IF  e  THEN  ft  <  ELSE  s  > 

LINS  <  e  > 


LOAD  <  FILE  >  e 
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NEW  H  ident  <  *■ 


I  «  !>“••# 

|  pointer  | 

I  procedure  j 
j  structure  | 


NUMBER  |  AS  e  J  <  BY  e  > 

|  group  <  AS  e  >  | 

OFP  <  SAVE  > 


PART  num  <  (  h  s  H  .  }  > 


PAUSE  <  e  > 


PRINT  <  PILE  >  e 


RECOVER  <  e  > 


RETURN  <  |  e  |  > 

|  pointer  | 

j  procedure  j 


SAVE  save-object  <  AS  <  PILE  >  e  > 


I  STEP  |  num  <  TO  nun  > 
I  STEPS  | 


TYPE  t-  type-object  H 


USE  <  PILE  >  e 


WRITE  H  type-object  H  <  AS  <  PILE  >  e  > 


?  <  $  >  h  <  string-litoral  >  varid  H 


{  t  S  H  .}.  } 


S8 
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a  <  character  -<...> 

f 

I 

var  *■  |  e  J 

j  pointer  j 
j  procedure  \ 
j  structure  | 


var  <  (  <  »-  |  e  |  H  .,.  >  )  > 

j  pointer  | 
j  procedure  j 
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Procedure  for  Logging  On  to  the  LCC  System 
at  a  2741  Terminal 


1.  Set  the  power  switch  (at  right  of  keyboard)  to  ON. 

2.  Make  sure  the  terminal  mode  switch  (on  left  side  of  2741)  is 
set  to  COM.  It  will  be  set  to  COM  if  and  only  if  the  keyboard 
is  locked,  which  you  can  easily  test  by  trying  to  press  the 
RETURN  key. 

3.  Push  the  TALK  button  on  your  Data-Phone. 

4.  Lift  the  phone  receiver  and  dial  the  computer,  which  will 

answer  and  then  emit  a  continuous  tone.  When  you  hear  the 

tone  (a  beep),  press  the  DATA  button  and  replace  the 
receiver.  You  are  now  connected  with  the  TSS  monitor  system, 
which  will,  after  a  short  delay,  type  back  to  you  a  message 
similar  to 

BO0 1  TSS  AT  CKO  TASKID=C031  09/23/69  17:31  8345  SDA-0053 

5.  Type  your  8-character  user  number  and  press  the  RETURN  key.  TSS 

will  respond  with  a  one  or  two  line  greeting  message  and,  on 
a  new  line,  an  initial  underline  character  C_)  followed  by  a 
backspace,  leaving  the  typing  element  positioned  at  the  first 
position  c  the  line. 

6.  If  this  is  to  be  your  first  session  with  LCC,  type  the 
characters 

SHARE  USER, LCC, USER 

and  press  RETURN.  TSS  will  respond  with  another 

underline-backspace.  This  SHARE  command  needs  to  be  typed 
only  once,  and  on  subsequent  runs  you  should  omit  it. 

7.  Type  the  characters 

DDEP  LCC, VP, USER. LCC,OPTION=JOBLIB 

and  press  RETURN.  TSS  will  again  respond  with  an 

underline-backspace. 
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fl.  Type  the  characters 
LCC 

and  press  RETURN.  After  a  short  delay,  LCC  will  respond  with 
a  polite  greeting  such  as 

LCC:  GOOD  AFTERNOON 

It  will  then  indent  four  spaces  and  give  you  control.  You  are 
now  communicating  directly  with  the  LCC  processor,  which  will 
analyze  all  succeeding  lines  which  you  type. 


The  conpl ate  logon  reccrd  for  your  first  LCC  run  will  thus  be 
similar  to  the  following: 

BO0 1  TSS  AT  CHU  TASKID=0031  09/23/69  17:31  8345  SDA*0053 
X  YZ  17,2 1  3 

15:22  23SEP  69-TSS  UP  TTLi.  24:00 

SHARE  USER, LCC, USER 

DDEF  LCC,  VP, 0 S ER . ICC , OPTI 0 Na  J OS LI B 

LCC 

LCC*,  GOOD  AFTERNOON 

For  subsequent  runs,  everything  will  look  the  same  except  for 
the  omission  of  the  ' SHARE'  line. 
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Typing  LCC  Text  at  a  2741 


The  characters,  including  blanks,  which  yon  type  will  be  sent 
to  ICC  line-by-line  i..  the  order  you  type  then.  However,  if  you 
discover  before  you  finish  typing  a  line  that  you  have  made  an 
error  on  that  line,  you  may  backspace  past  the  incorrect 
characters,  thus  deleting  them  from  the  line  being  sent  to  LCC 
(though  not,  obviously,  from  your  typed  page).  You  may  then 
complete  the  line  by  typing  the  correct  characters  or,  if  no 
correction  is  needed,  merely  press  the  RETURN  key.  Each  time  you 
press  BACKSPACE,  you  will  delete  one  character  from  the  line;  thus 
five  BACKSPACES  would  erase  the  last  five  characters  (including 
blanks)  which  you  typed.  After  backspacing,  you  should  manually 
upspace  the  paper  in  your  2741  to  avoid  any  confusion  which  would 
be  caused  by  strike  overs. 

If  your  whole  line  is  wrong,  you  may  cancel  it  all  by  pressing 
RETURN  immediately  after  typing  either  the  character  or  the 
character  V'.  LCC  will  completely  iqnore  the  line,  and  it  will 
merely  unlock  the  keyboard  for  the  next  line  —  it  will  not  indent 
the  typing  element  after  such  a  line  cancellation.  Note  that  a  'o' 
and  a  V*  will  act  to  cancel  a  line  only  when  they  are  followed 
immediately  by  a  RETURN.  In  all  other  cases  they  are  sent  along  as 
legitimate  LCC  characters. 

When  you  complete  a  line,  you  must  terminate  it  by  pressing 
the  RETURN  key.  This  will  cause  the  sequence  of  characters  which 
you  typed  to  be  sent  to  the  LCC  processor  for  syntactic  analysis 
and  possible  action.  LCC  will  scan  your  line  from  left  to  right  in 
order  to  translate  it  into  an  internal  interpre table  code.  If  your 
line  is  syntactically  incorrect,  an  error  nessage  will  be  typed 
back  to  you,  indicating  (by  a  *|')  the  position  in  the  line  of  the 
item  which  had  just  been  scanned  when  the  error  was  encountered 
and  (by  a  number)  the  kind  of  error  which  was  found  (see  Appendix 
E).  If  your  line  is  correct,  LCC  will  determine  whether  it  is  a 
complete  step  or  whether  you  plan  to  supply  an  additional  line  to 
continue  it.  You  must  indicate  such  continuation  by  typing  a 
hyphen  or  minus  character  ('-')  just  before  pressing  RETURN.  The 
next  line  will  then  be  concatenated  with  the  current,  line  such 
that  its  first,  character  will  follow  directly  after  the  last 
character  before  the  hyphen,  and  the  hyphen  will  be  deleted. 

Each  line  will  be  analyzed  as  above  until  a  step  is  found  to 
be  complete.  LCC  will  then  determine  whether  the  step  is  immediate 
or  delayed  by  checking  its  step  number.  If  it  has  a  number,  the 
step  is  delayed,  and  it  will  be  saved  internally  so  that  it  may  be 
called  into  execution  at  some  later  time.  If  it  has  no  number,  the 
actions  specified  by  the  step  will  be  performed  immediately.  When 
all  such  actions  have  been  completed,  LCC  will  indent  one  or  more 
spaces,  unlock  the  keyboard,  and  return  control  to  you. 


*2 
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Error  Messages 


Translator  (syntax)  errors  —  A  vertical  bar  character  (|) 
will  he  typed  under  the  position  in  your  step  text  which 
had  just  been  scanned  by  the  translator  when  it  discovered 
the  error,  and  a  message  of  the  form 

ERROR  SXnn  text 

will  be  written.  mnn*  is  a  two  digit  number  which 
specifies  the  tr«_aslator  error  which  has  been  encountered, 
and  *text*  is  an  abbreviated  description  of  the  error  (see 
Appendix  F  for  some  expanded  descriptions  of  the  errors). 
The  error  message  will  be  left- justified  on  the  line 
containing  the  *|'  marker  unless  the  marker  occurs  within 
the  first  10  characters  on  the  line,  in  which  case  the 
message  will  be  typed  to  the  right  of  the  marker. 


Execution  errors  —  Execution  error  messages  are  of  the  fora 
ERROR  amma  text 

where  Mamm*  is  a  four  character  internal  error  designator 
and  mtext*  is  a  string  which  describes  the  error  which  has 
been  encountered.  Examples  are 

ERROR  UN0 1  V[45,11  IS  UNDEFINED 

ERROR  G003  STEP  2.15  NOT  IN  AN  ACTIVE  CONTEXT 

ERROR  VE03  SUBSCRIPT  OUT  OF  RANGE 

ERROR  OROI  AT  61.4  DIVISION  BY  TERO 


A  complete  listing  of  all  the  errors  caught  by  LCC,  with 
explanations  of  their  causes  and  descriptions  of  any 
possible  recovery  options,  may  be  found  in  the  reference 
document  *LCC  Error  Messages*. 
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-  LCC  Syntax  (SX)  Error  Descriptions 


1:  This  should  have  been  a  statement,  but  it  isn't  one. 

2:  This  literal  constant  is  malformed. 

3:  This  must  be  an  operand.  It  isn't  one. 

4:  This  must  be  an  operator  or  a  delimiter.  It  isn't  one. 

5:  No  M'  to  match  this  ']'. 

6:  An  extracted  value  may  not  be  subscripted. 

7:  In  the  current  language  context,  this  is  meaningless. 

6:  This  should  be  a  statement  terminator  (END,  >,  ;,  ELSE,  v). 

9:  No  M'  to  match  this  ')'. 

10s  No  'BEGIN'  to  match  this  'END'. 

11:  No  'IF'  to  watch  this  'THEN'. 

12:  No  'THEN'  to  match  this  'ELSE'. 

13:  Your  *  must  meet  its  match  here. 

14:  You  need  a  step  or  part  number  here. 

15:  A  controlled  variable  must  be  an  ident:  r. 

16:  Your  CASE  statement  needs  a  '('  here. 

17:  Your  CASE  expression  needs  a  '('  here. 

18:  The  'OTHERWISE'  must  be  last  in  a  CASE  list. 

19:  You  can't  store  into  an  extracted  value. 

20:  You  can't  have  more  than  an  expression  here. 

21:  You  need  'AS'  here. 

22:  A  parameter  may  only  be  delimited  by  ','  or  ')'. 

24:  This  step  is  missing  an  'END'. 

25:  This  step  is  missing  a  '}'. 

26:  No  '{'  to  match  this  '>'. 

27:  You  need  to  specify  some  subscript  bounds  here. 

28:  You  can  only  request  input  to  a  variable,  not  an  expression. 
30:  You  need  'FROM'  or  'IN'  or  a  statement  terminator  here. 

.32:  No  'v'  to  match  this  one. 

34:  You  need  a  ')'  to  end  this  formal  parameter  list. 

35:  You  need  a  save-object  or  a  group  designator  here. 

36:  You  need  a  qroup  designator  here. 

38:  This  must  be  an  identifier. 

39;  This  must  be  a  '•'. 

40:  You  need  a  ':'  or  a  ','  to  delimit  this  ALTER  list. 

43:  This  can't  follow  an  iterated  output  element. 

44:  This  should  be  a  step  number,  but  it  isn't  one. 

96:  Whoops  —  the  first  phase  of  the  translator  has  just  had  a 
stack  indexing  error,  which  should  be  impossible.  Please  show 
your  listing  to  an  LCC  implementor. 

97:  The  translator  has  just,  run  into  some  sort  of  a  semantic 
error.  It  could  be  due  to  something  simple,  like  an  unmatched 
'END',  but  if  you  can't  find  a  mistake,  please  ask  an  LCC 
implementor  for  some  help. 

99:  Congratulations:  you  have  just  found  an  error  in  the  LCC 
syntax  tables.  Please  tell  an  LCC  implementor  about  it. 
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Automatic  Reload  Pile 


) 


There  is  a  possibility  that  during  a  conversational  session  a 
hardware  or  software  failure  will  kill  LCC  and/or  TSS  and  break 
off  your  conversation.  In  that  case  ICC  will  lose  all  of  its 
temporary  records  of  your  interactions,  which  would  normally 
include  all  of  your  delayed  steps  and  all  'values*  which  had  been 
assigned  to  your  variables  as  well  as  all  the  stacked  information 
on  the  status  of  your  program's  execution  at  the  instant  of  the 
system  failure.  The  values  and  the  execution  information  will  be 
irretrievably  lost,  but  LCC  includes  a  special  feature  to  save 
vour  delayed  steps,  thus  lessening  the  catastrophic  effects  of  the 
system  crash. 

This  feature  is  the  'automatic  reload  file',  a  file  on  which 
your  delayed  steps  are  automatically  saved  while  your  conversation 
progresses.  If  there  are  no  system  failures  during  your  session, 
this  file  will  be  deleted  when  you  log  off  (unless  you  explicitly 
retain  it  with  an  'OFF  SAVE'  statement),  but  if  the  system  fails, 
the  file  will  not  be  deleted  and  thus  will  be  available  for 
reloading  when  you  next  call  LCC.  Each  time  you  call  LCC,  a  check 
will  be  made  to  determine  whether  your  automatic  reload  file 
exists.  If  it  does  not,  nothing  is  done,  but  if  it  does,  you  will 
be  qiven  control  after  the  message 

AUTOMATIC  RELOAD?  Y  OR  N 

You  then  have  the  option  either  to  restore  your  delayed  steps  by 
loading  the  file  (by  typing  'Y'  and  pressing  the  RETORN  key  or  by 
merely  pressing  RETURN)  or  to  ignore  the  file  and  delete  it  (by 
typinq  'N'  and  pressing  RETURN).  Steps  will  be  added  to  the  reload 
file  in  sets  of  5  in  the  order  you  type  them;  thus  you  may  lose 
your  last  five  typed  steps  after  a  crash,  but  no  more.  Remember 
that  no  values  or  context  information  will  be  automatically  kept, 
so  ,ou  may  have  to  perform  a  lot  of  initialization  to  resume 
execution  from  the  point  of  the  crash. 
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Standard  Functions 


The  standard  functions  which  are  included  in  LCC  as  predefined 
procedures  are  listed  below.  Each  requires  as  an  argument.  (ARG) 
one  actual  parameter  which  must  evaluate  to  a  number.  The 
arguments  of  the  trigonometric  functions  (and  the  results  of  the 
inverse  trigonometric  functions)  must  be  in  radians. 


Name  Function  Definition 


ABS 

Absolute  value 

|  ARG  | 

ARCCOS 

Arccosine 

arccos (ARG) 

ARC  SIN 

Arcsine 

arcsin (ARG) 

A  RCTAN 

Arctangent 

arctan (ARG) 

COS 

Cosine 

cos (ARG) 

COTAN 

Cotangent 

cotan(ARG) 

ENTIEP 

largest  integer  <  ARG 

EXP 

Exponential 

e  f  ARG 

LN 

Natural  logarithm 

In (ARG) 

LOG 

Common  logarithm 

loqtt(ARG) 

SGN 

Sign 

IF  ARG  >  0  THEN  1  ELSE  IF  ARG  <  0 

SIGN 

Sign  (same  as  SGN) 

THEN  -1  ELSE  0 

SIN 

Sine 

sin (ARG) 

SORT 

Square  root 

ARG  f  (1/2) 

TAN 

Tangent 

tan  (ARG) 
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-  Built-in  LCC  Functions  and  Procedures 


Tho  special  functions  and  procedures  which  are  included  in  the 
LCC  system  are  described  below.  To  use  the  name  of  a  standard  or 
built-in  function  as  a  variable,  you  must  declare  it  as  'NEW'.  The 
function's  oriqinal  meaning  will  then  be  lost  for  as  long  as  your 
declaration  is  in  effect.  If  you  declare  one  of  these  identifiers 
on  level  zero,  its  original  meaning  will  be  lost  for  the  duration 
of  your  conversational  session  unless  you  reinitialize  your  LCC 
environment  by  executing  a  'DELETE  ALL'  statement. 


COLLATE  (  arg  ) 


Arg  must  be  an  expression  which  evaluates  to  a  string.  The 
value  of  the  function  COLLATE  is  an  integer  associated  with  the 
leftmost  character  of  tne  value  of  arg.  A  unique  inteqer  is 
returned  for  each  valid  LCC  character,  and  the  integers  will  be 
ordered  according  to  the  System/360  EBCDIC  collating  sequence  for 
tho  associated  characters.  The  space  or  blank  character  comes 
first  in  the  collating  sequence  and  thus  has  the  snallest 
associated  integer.  The  other  valid  LCC  characters  are  listed 
below  in  order  of  ascending  collating  sequence  (left  to  right  and 
top  to  bottom). 

*av(  t  1**3]  .<  (  ♦  | 

$>  *  )  ;  •-/«<,»_>?  =  ***  'a:  a  B  v  =  \ 
abcdef  q  h  i  1  k  1  mnopqrstuvwxyz 
ABCDEFGHIJKLHNOPOESTUVWXYZ 
01234S67B9 


Examples;  The  following  steps  define  a  function  ALPHA  which 
returns  the  value  TRUE  if  the  first  character  in  its  argument 
string  is  alphabetic  (lower  or  upper  case);  otherwise  it 
returns  FALSE. 


1.S:  ALTER  1.6,  'LL'-COLLATE ( ' J A' ) ,  ' UL'-COLLAT E( 'Z' ) ; 
1.6:  ALPHA  -  v  (X)  ((X  -  COLLATE (X) )  >  LL)  a  (X  <  OL)  v; 
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EE 


Tnis  parameterless  function  has  as  a  constant  value  the  base 
of  the  natural  logarithms,  i.e.,  2.713281828  ...  Its  value  is  as 
accurate  as  is  possible  in  a  System/360  double-word. 


EXTERNAL  (  arg  ) 


This  procedure  allows  you  to  temporarily  add  to  your  LCC 
environment  a  non-LCC  procedure  or  function  which  is  to  be  called 
from  your  LCC  program.  Its  argument  must  be  a  pointer  to  the  name 
of  the  procedure  or  function  to  be  added  (e.g.,  a  NAN) .  The  effect 
of  EXTERNAL  is  temporary  and  lasts  only  until  you  log  off  or 
reinitialize  with  a  'DELETE  ALL'  statement. 

The  external  procedure  or  function  to  be  added  oust  satisfy 
the  standard  TSS  (FORTRAN)  linkage  conventions  and  its  name  must 
appear  as  an  entry  point  in  one  of  your  effective  TSS  ■job-library 
stack  aeabecs.  The  value  which  it  returns  (if  any)  must  be  a 
double-word  number  placed  in  floating-point  register  zero.  All 
FORTRAN  double-precision  library  functions  which  do  not  involve 
arrays  satisfy  these  conditions  and  are  acceptable  EXTERNAL 
functions.  Any  other  experimentation  is  at  your  own  risk. 


Examples:  The  following  statements  indicate  to  LCC  that  you  wish 
to  use  the  FORTRAN  procedures  'DSIN '  and  'DCOS'. 

EXTERNAL(  =»0SIN  ); 

EXTERNAL (  =*DCOS  ); 


INTERNAL  (  arg.1  ,  arg_2  ) 


This  procedure  should  not  be  called  by  a  normal  user.  Its  name 
is  included  here  merely  to  forestall  possible  naming  conflicts. 


LENGTH  (  arg  ) 


Arq  must  be  an  expression  which  evaluates  to  a  string.  The 
function  LENGTH  will  have  as  its  value  the  length  (ir.  number  of 
characters)  of  that  string. 
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Examples: 

The  value  of  L  ENGTH  (  *  XYZ'  )  is  3. 

The  value  of  L ENGTH ( S  o  1234),  where  S  =  'CHU',  is  7. 


This  parameterless  function  has  as  a  constant  value  the 
mathematical  constant  pi,  i,e.,  3.141592653  ...  Its  value  is  as 
accurate  as  is  possible  in  a  System/360  double-word. 


SCANN  (  arg_1  ,  arg_2  ,  arg_3  ) 


SCANN  is  a  procedure  which  scans  a  string  to  obtain  its  first 
atomic  element.  Its  first  arqument  (arg_1)  must  be  an  expression 
which  evaluates  to  a  string,  and  arg_2  and  arg_3  must  be  pointers 
(i.e. ,  aV  and  =»H,  where  V  and  V  are  arbitrary  variables).  SCANN 
will  search  the  string  supplied  by  arg_1  for  its  first  (leftmost) 
atom.  It  wilL  store  that  atom  into  the  variable  pointed  to  by 
arg_2  (i.e.,  v),  and  it  will  store  into  W  a  strinq  consisting  of 
everything  from  arg_1  which  is  to  the  right  of  its  first  atom. 

For  scanning  purposes,  an  atom  is  one  of  the  followinq: 

1.  A  contiguous  string  of  alphabetic  and/or  numeric 
characters  (e.g.,  'ABCD',  '345',  -P42G',  '64AB2'). 

2.  A  single  non-alphanumeric  character  (e.g.,  '*',  '.', 

'.M 

Blanks  which  precede  an  atom  will  be  ignored,  and  an  atom  will  be 
terminated  by  a  blank,  another  atom,  or  the  end  of  the  string 
which  contains  it. 


Examples:  The  step 

SCA  NN  (  '  AB  ♦ABC*DE',  »L,  =>R);  SCANN  (  R,  =>LL,  =>RR) 

will  set  L  to  'AB',  R  to  '  +ABC*DE' ,  LL  to  and  RR  to 

' ABC*DE'. 


SRI. ITT  (  arq_1  ,  arg_2  ,  arg_3  ,  arg_4  ) 


SPITTT  is  a  function  which  searches  a  string  (of  atoms)  for  a 
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specified  substring.  Its  value  will  be  TRUE  if  the  substring  can 
be  found  or  FALSE  if  it  cannot.  Its  first  two  arguments  oust  be 
expressions  which  evaluate  to  strings,  and  its  last  two  arguments 
must  be  pointers  (i.e.,  and  aH,  where  V  and  N  are  arbitrary 
variables).  SPLITT  will  treat  both  strings  as  sequences  of  atoms 
(see  the  SCANN  procedure  above)  and,  searching  from  left  to  right, 
it  will  attempt  to  find  a  sequence  of  atoms  in  arg_2  which  matches 
the  atomic  sequence  -\rg_1.  If  such  a  sequence  is  found,  SPLITT 
will  return  the  value  TRUE  and,  as  side  effects,  it  will  store  all 
of  arg_2  to  the  left  of  the  match  into  the  variable  pointed  to  by 
arg_3  (i.e.,  V),  and  it  will  store  everything  to  the  right  of  the 
match  into  W.  If  no  matching  subsequence  is  found,  V  and  H  will  be 
left  unchanged. 

Note  that  the  matching  done  by  SPLITT  is  atom-by-atom  rather 
than  character-by-character.  This  means  that  the  character  string 
arg_1  need  not  be  contained  exactly  in  arq_2  to  obtain  a  match, 
though  it  must  be  except  for  blanks  which  may  surround  atoms 
(i.e.,  the  strings  ' AtB',  '  A  *B',  ' A  ♦  B'  are  all  equivalent 
in  this  atomic  sense).  Effectively  then,  all  extraneous  blanks  in 
arg_1  are  deleted  before  the  match  is  performed,  and  arg_2  cannot 
be  searched  for  sequences  of  blanks. 


Examples:  The  operand 

SPLITT ( ' AB# ,  *  ABC: AB^AB+1 * ,  ^L,  =»R> 

has  the  value  TRUE  and  it  sets  L  to  ' ABC : *  and  R  to 
'•-AR+ 1 ' ,  The  operand 

SPLITT ( '  3  .  4  ',  '3.4  :A  +  B' ,  »LL,  ^RR) 

has  the  value  TRUE  and  it  sets  LL  to 
and  RP  to  '  :A  «•  B'. 


(the  null  string) 
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Example  LCC  Conversation 


A  THIS  TS  THE  RECORD  OF  AN  ACTOAL  CONVERSATION  BETWEEN  A  USER 
A  (AT  A  REMOTE  2741  TYPEWRITER)  AND  THE  LCC  SYSTEM. 

A  THE  FOLLOWING  ARE  NUMBERS  (LITERAL  NUMERIC  CONSTANTS)  IN  LCC; 

IS 

IS 

7.36 

7.  36 

.00065 

.00065 

1234567890. 

1234567890 

A  WE  CAN  APPEND  AN  EXPONENT  TO  GET  LARGER  (OR  SMALLER)  NUMBERS: 

6. ?w12 

.62,0+13 

3.  721M-  5 
.00003721 
6.  35M-42 
.635,0-41 

12345.  2,0  +  65 
.  123452w+70 

A  AN  EXPONENT  ALONE  IS  ALSO  A  NUMBER. 


w-4 

.0001 

. 1«+  16 


A  NUMBERS  ARE  OPERANDS  WHICH  CAN  BE  COMBINED  INTO  EXPRESSIONS, 

A  USING  THE  UNARY  PREFIX  OPERATORS  (WHICH  ARE  WRITTEN  TO  THE 
A  LEFT  OP  AN  OPERAND) : 

A  -  NEGATE 

A  ♦  (HAS  NO  EFFECT) 

A  *  TRUNCATE  (STRIP  OFF  THE  FRACTIONAL  PART) 

a  AND  THE  RTNARY  INPIX  OPERATORS  (WRITTEN  BETWEEN  TWO  OPERANDS) 
A  ♦  ADD 

A  -  SUBTRACT 

A  *  MULTIPLY 

A  /  DIVIDE 

A  ♦  RAISE  TO  A  POWER 

A  l»  WE  TYPE  IN  AN  EXPRESSION,  LCC  WILL  EVALUATE  IT  AND  TYPE  BACK 
A  THE  RESULT.  THUS  WE  CAN  USE  LCC  TO  PERFORM  'DESK  CALCULATOR' 
A  OPERATIONS. 

a  LET'S  TRY  A  FEW  EXPRESSIONS  TO  SEE  WHAT  WILL  HAPPEN. 
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2*2 

4 

3*8 

24 

-5 

-5 

2345-876 

1469 

1/3 

.3333333333 

2/7 

.2867142857 
2f  5 
32 

2»  32 

4294967296 

2345. 6789t  a  I  GOOFED.  TO  CANCEL  THIS  LINE  I'LL  TYPE  °  AND  RETURN 
ERROR  SX03  | 

A  I  GOOFED  AGAIN  —  I  HIT  THE  RETURN  KEY  FIRST  INSTEAD  OF  THE 
A  KEY,  SO  LCC  TRIED  TO  TRANSLATE  THE  LINE.  ITS  TRANSLATOR  FOUND 

A  THAT  I  HAD  A  HISSING  OPERAND,  WHICH  I  ALREADY  KNEW. 

A  I'LL  TRY  IT  AGAIN  ON  THIS  LINE  —  o 
A  LCC  IGNORED  THAT  LINE  AND  MERELY  UNLOCKED  THE  KEYBOARD  TO  LET  HE 
A  TYPE  ANOTHER  ONE.  LCC  WILL  NEVER  INDENT  AFTER  A  CANCELLED 

A  LINE.  EITHER  A  'o'  OR  A  V'  WILL  CANCEL  A  LINE,  BUT  TO  DO 

A  SO  IT  MUST  BE  TYPED  IMMEDIATELY  BEFORE  A  CARRIER  RETURN. 

A  AN  EMBEDDED  'a'  OR  V'  HAS  NO  SUCH  CANCELLATION  PROPERTIES. 
a  LCC  WILL  ALSO  IGNORE  BLANK  LINES  AND  ANY  LINES  (SUCH  AS  THESE) 

A  WHICH  BEGIN  WITH  A  DELTA  (A).  THUS  COMMENT  LINES  MAY  BE 
A  TYPED  WITHOUT  ANY  ANALYSIS  FROM  THE  LCC  SYSTEM. 

NOTE  THAT  IF  I  FORGET  THE  'A'  ON  A  COMMENT  LINE,  LCC  WILL  OBJECT. 
ERROR  SX04  | 

A  IT  SAYS  'THAT'  ISN'T  AN  OPERATOR,  WHICH  IS  CERTAINLY  TRUE.  AN 
A  ENGLISH  SENTENCE  DOESN'T  USUALLY  TURN  OUT  TO  BE  A  VALID 
A  LCC  STATEMENT. 

A  IF  YOU  HAKE  AN  ERROR  AND  NOTICE  IT  BEFORE  YOU  SEND  THE  LINE  TO 
A  LCC  (I.E. ,  BEFORE  YOU  HIT  THE  RETURN  KEY),  YOU  CAN  CORRECT 
A  THE  ERROR  BY  BACKSPACING  TO  THE  LEFTMOST  BAD  CHARACTER  AND 

A  RETYPING  IT  AND  ALL  THE  CHARACTERS  WHICH  FOLLOWED  IT.  ANY 

A  CHARACTERS  BACKSPACED  OVER  (NOT  JUST  THE  LEFTMOST  ONE)  WILL 

A  BE  DELETED  FROM  THE  LINE.  I'LL  SHOW  YOU  AN  EXAMPLE: 

12.34,56  THE  SHOULD  BE  A  '♦'.  I'LL  BACKSPACE.  AND  RETYPE  IT. 
♦56  a  I  UPSPACED  MANUALLY  To  AVOID  STRIKEOVERS. 

68.34 

A  STRIKEOVERS  WON'T  BOTHER  LCC,  BUT  I  WOULDN'T  BE  ABLE  TO  READ 
A  WHAT  I  TYPED. 

A  NOW  LET'S  TRY  SOME  MORE  EXPRESSIONS. 

*2345.876 

2345 

+  345 


345 
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234  ♦  12.5  *  54.2  /  6„3  -  2 
212.  1129167 

A  UMAR V  OPERATIONS  ARB  NORMALLY  DONE  BEFORE  »'S,  WHICH  ARE  DONE 
A  BEFORE  a  AND  /,  WHICH  TN  TURN  ARE  DONE  BEFORE  ♦  AND  -. 

A  HOWEVER ,  WE  CAN  CHANGE  THIS  IMPLICIT  HIERARCHY  OF  OPERATIONS 

A  BY  USING  PARENTHESES. 

12.76  *  (92.5  /  .341  -  .00058)  ♦  (3  *  .789) 

7228636.11 

A  THIS  WAS  DONE  AS  IF  IT  HAD  BEEN  WRITTEN 

12.78  *  <  (  (  42.5  /  .341)  -  .00058)  t  (3  *  .788)  ) 

7228636. 11 

A  BESIDES  THE  UNARY  AND  BINARY  OPERATORS  WE  CAN  USE  SOME  OF  THE 

A  STANDARD  MATHEM  ATICi'L  FUNCTIONS  SUCH  AS 

A  SQRT  SQUARE  ROOT 

A  SIN  SINE  (ARGUMENT  IN  RADIANS) 

A  COS  COSINE  (ARGUMENT  IN  RADIANS) 

A  IN  LOGARITHM  (BASE  E) 

A  EXP  EXPONENTIAL  ( El ARGUMENT) 

a  ARCTAN  ARCTANGENT  (ANGLE  IN  RADIANS) 

A  LET'S  TRY  A  FEW  OF  THEM. 

SORT (3) 

1.732050  808 
SQRT (234 ) 

15.29705854 
SIN( 5) 

-.9589242747 
LN  (2) 

.6931471806 
SX?(  1) 

2.718281828 

A  THUS  PAP  IN  THIS  CONVERSATION,  NO  VALUES  HAVE  BEEN  RETAINED  BY 
A  LCC (  BUT  IF  WE  WISH  TO  KEEP  A  COMPUTED  NUMERIC  VALUE,  WE  CAN 

A  STORE  IT  INTO  A  VARIABLE.  VARIABLES  ARE  DESIGNATED  BY 

A  IDENTIFIERS,  WHICH  YOU  CAN  CHOOSE  FREELY  (EXCEPT  FOR  LCC 

A  KEYWORDS  LIKE  'TYPE'  AND  'IF',  WHICH  HAVE  SPECIAL  MEANINGS). 

A  AN  IDENTIFIER  MUST  BEGIN  WITH  A  LETTER  AND  IT  CAN  CONTINUE 

A  WITH  LETTERS,  DIGITS,  OR  UNDERLINE  (_)  CHARACTERS.  IDENTIFIERS 

A  CAN  RE  AS  LONG  AS  YOU  LIKE,  BUT  LCC  WILL  IGNORE  ANY  CHARACTERS 
A  AFTER  THE  FIRST  8. 

A  I'LL  PICK  SOME  IDENTIFIERS  AND  STORE  VALUES  INTO  THEM.  NOTE  THAT, 
A  UNLIKE  ALGOL,  LCC  DOES  NOT  REQUIRE  ME  TO  DECLARE  AN  IDENTIFIER 
A  BEFORE  I  USE  IT. 

A  -  5  ?  B  -  4  ;  LCC  -  111868  ;  FISH  *  0  ;  NOVEMBER  -  18  ;  A_B_C  -  35 
A  WE  CAN  CHECK  THE  VALUES  WHICH  WERE  STORED  BY  TYPING  THEM  OUT. 

TYPE  A, B, LCC, PISH, NOVEMBER, A_B_C 
5 
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4 

11 1868 

0 

18 

35 

A  NOW  RE  CAN  USE  THESE  VARIABLES  AS  OPERANDS  IN  FURTHER  CALCULATIONS 
A+B 

4 

SQRT(B+FISH) 

2 

LCC  /  NOVEMBER  -  (LCC  ♦  A  B  C) 

-3909165.111 

a  WE  CAN  CHANGE  THE  VALUE  OF  A  VARIABLE  WHENEVER  WE  WISH: 

A  -  -742.8  ;  B  -  B-1;  FISH-34-B;  TYPE  A,  3, FISH 

-742.8 
3 

31 

a  THE  CONSTRUCTION  A  *-  5  IS  A  STATEMENT,  IN  PARTICULAR,  AN 

a  ASSIGNMENT  STATEHENT.  THE  'TYPE'  STATEMENT  IS  ANOTHER  KIND  OF 
a  STATEHENT  WHICH  CAUSES  EACH  OF  A  LIST  OF  EXPRESSION  VALUES  TO 
a  BE  TYPED  BACK  TO  OS  {ONE  VALU«  PER  LINE).  WE  CAN  PUT  MORE  THAN 

a  ONF  STATEHENT  ON  A  LINE  BY  SEPARATING  THE  SUCCESSIVE  STATEMENTS 

a  BY  SEMICOLONS  (AS  ABOVE).  A  SEMICOLON  AFTER  THE  LAST  STATEMENT 
A  ON  A  LINE  IS  OP  ION AL. 

a  WE  CAN  MAKE  AN  ASSIGNMENT  INSIDE  AN  EXPRESSION,  OR  WE  CAN  BOTH 
A  TYPE  AND  ASSIGN  IF  WE  WISH. 

T-A/(C-B-1)*  100;  TYPE  T,C 
-271.4 
2 

TYPE  P  -  LCC  ♦  1 
11  1869 

TYPE  CAT  -  DOG  -  3; 

ERROR  UN01  DOG  IS  UNDEFINED 

a  THAT  DIDN'T  WORK  BECAUSE  I  FORGOT  TO  GIVE  A  VLAUE  TO  THE  VARIABLE 
a  DOG.  I'LL  DO  SO  AND  TRY  AGAIN.  NOTE  THE  ERROR  MESSAGE  FROM 

a  LCC 'S  EXECUTOR,  WHICH  WAS  UNABLE  TO  CONTINUE  AFTER  FINDING  AN 

a  UNDEFINED  VARIABLE. 

DOG  -  *5 

TYPE  CAT  -  DOG  -  3 
99997 

W^K-L-M-N-0;  A  WE  CAN  ASSIGN  A  VALUE  TO  A  WHOLE  SET  OF  VARIABLES. 
TYPE  t+.UK+L+M  +  N;  a  THEY  WILL  ALL  BE  ZERO. 

0 

IJKLMNOPQRSTUVWXYZ  -  5;  TYPE  IJKLMNOP;  a  LCC  IGNORES  THE  REST. 

5 

A  WE  CAN  TEST  THE  VALUES  OF  VARIABLES  BY  MEANS  OF  AN  'IF'  STATEHENT. 
a  EXAMPLES  ARE: 

IF  A  <  B  THEN  TYPE  3  ELSE  TYPE  0 
3 

IF  B*P  *  LCC  THEN  TYPE  9999 
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9999 

A  IF  ME  WANT  TO  PERFORM  MORE  THAN  ONE  ACTION  DEPENDING  ON  A 
A  CONDITION,  HE  CAN  COMBINE  A  SEI  OF  STATEMENTS  INTO  A  SINGLE 
A  COMPOUND  STATEMENT  VIA  THE  STATEMENT  BRACKETS  {  AND  >. 

A  THUS  WE  CAN  TYPE: 

IF  A/B  <  P  THEN  T  -  3  ;  W  -  4  ;  TYPE  T*K  }; 

7 

IF  T  =  P  THEN  IP  A  *  B  THEN  TYPE  3  ELSE  TYPE  4  ELSE  TYPE  5 
5 

A  NOTE  THAT  ANY  STATEMENT  (EVEN  AN  IF  STATEMENT)  CAN  FOLLOW  A 
A  'THEN'  (OR  AN  'ELSE'). 

a  SO  MUCH  FOR  THE  BASIC  'DESK  CALCULATOR'  FEATURES  OF  LCC.  SUPPOSE 
a  ME  WTSH  TO  WRITE  A  PROGRAM  AND  STORE  IT  INSIDE  LCC.  THUS  FAR 

A  IN  THIS  CONVERSATION,  NONE  OF  OUR  STATEMENTS  HAVE  BEEN  KEPT 

a  AFTER  BEING  EXECUTED,  THOUGH  LCC  HAS  SAVED  THE  VALUES  WHICH  WE 
A  ASSIGNED  TO  OUR  VARIABLES.  WE  CAN  SAVE  STATEMENTS  WHICH  ARE 
a  TO  BE  CALLED  OUT  LATER  FOR  EXECUTION  BY  GIVING  THEM  'STEP 
A  NUMBERS'  WHICH  BOTH  IDENTIFY  THEM  FOR  OUR  FUTURE  USE  AND  ALLOW 
A  LCC  TO  ORDER  THEM  PROPERLY.  AS  AN  EXAMPLE,  LET'S  WRITE  A 
A  SIMPLE  PROGRAM  TO  COMPOTE  FACTORIALS. 

3. 1:  FACT  -  1 ; 

A  THE  STEP  NUMBER,  3.1,  CAN  BE  SEPARATED  INTO  TWO  PORTIONS,  THE 
a  INTEGER  PORTION,  WHICH  IS  THE  'PART  NUMBER',  AND  THE  FRACTIONAL 
A  PORTION.  SINCE  THE  INTEGER  PORTION  IS  3,  THIS  STEP  IS  STORED 
A  IN  PART  3,  AND  THE  FRACTION  INDICATES  ITS  POSITION  RELATIVE  TO 

A  OTHER  STEPS  IN  PART  3.  PART  NUMBERS  MOST  BE  BETWEEN  1  AND  9999, 

A  AND  THE  STEP  FRACTION  MUST  BE  BETWEEN  .0001  AND  .9999.  LEADING 

A  ZEROS  IN  THE  PART  NUMBER  AND  TRAILING  ZEROS  IN  THE  FRACTION  MAY 

A  BE  OMITTED. 

A  LET'S  GO  ON  WITH  OUR  PROGRAM. 

3.2000:  FACT  -  FACT  *  N;  A  WE'LL  COMPUTE  N!  AND  PUT  IT  INTO  FACT. 

3.3:  IP  N  =  1  THEN  RETURN  ; 

3.40:  N  *  N  ~  1  ; 

3.5:  GO  TO  3.3;  A  WE  CAN  TRANSFER  CONTROL  1  -  A  NUMBERED  STEP. 

A  NOW  LET'S  SEE  WHAT  PART  3  LOOKS  LIKE. 

DISPLAY  PART  3  ;  A  THIS  WILL  TYPE  OUT  THE  STEPS  IN  PART  3. 

3.  1:  FACT  *  1  ; 

3.2:  FACT  -  FACT  *  N;  a  WE'LL  COMPUTE  N!  AND  PUT  IT  INTO  FACT. 

3. 3:  IF  N  =  1  THEN  RETURN  ; 

3.4:  N  -  N  -  1  ; 

3.5:  GO  TO  3.3;  A  WE  CAN  TRANSFER  CONTROL  TO  A  NUMBERED  STEP. 

A  NOW  I'LL  GIVE  A  VALUE  TO  N  AND  CALL  PART  3.  EXECUTION  WILL  BEGIN 
A  WITH  STEP  3.1  AND  PROCEED  TO  SUCCESSIVELY  HIGHER  NUMBERED  STEPS 

A  UNLESS  WE  EXPLICITLY  TRANSFER  CONTROL  WITH  A  'GO  TO'  STATEMENT. 
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N  -  5;  PART  3 
TYPE  PACT 
5 

A  HNNM...  THAT'S  NOT  5!  -  T  GUESS  I  HAVE  A  BUG. 

A  OH,  YES;  STEP  3.5  SHOULD  GO  TO  3.2.  I'LL  CHANGE  IT  BY  RETYPING 
A  STEP  3.5.  THAT  WILL  PRASE  THE  OLD  STEI'  AND  REPLACE  IT  BY  NY 
A  NEW  ONE. 

3.5:  GO  TO  3.2  ; 

A  NON  TRY  AGAIN. 

N~5  ;  PART  3 
TYPE  PACT 

120 

A  THAT'S  BETTER.  LET'S  FIX  STEP  3.3  SO  IT  MILL  RETURN  THE  VALUE 
A  OF  PACT. 

ALTER  STEP  3.3  :  'RETURN'  -  'RETURN  PACT' 

a  THAT  CHANGED  THE  TEXT  OP  STEP  3.3  BY  SUBSTITUTING  ONE  STRING  FOR 
A  ANOTHER.  THE  KEYWORD  'STEP'  HAS  OPTIONAL  IN  THIS  ALTER 

A  STATEMENT,  AND  I  COULD  HAVE  USED  A  ','  IN  PLACE  OF  THE 

DISPLAY  STEPS  3.3  TO  3.5;  A  LET'S  CHECK  THE  TAIL  END  OP  OUR  PART. 

3.3:  IF  N  =  1  THEN  RETUPN  FACT  ; 

3.4:  N  -  N  -  1  ; 

3.5:  GO  TO  3.2  ; 

A  LOOKS  O.K.  A  FURTHER  WORD  ABOUT  THAT  DISPLAY  STATEMENT  —  IN 
A  SPECIFYING  A  GROUP  OP  ONE  OR  MORE  STEPS  OR  PARTS,  THE  KEYWORDS 

A  'STEP'  AND  'STEPS'  ARE  EQUIVALENT  EVERYWHERE  IN  LCC,  AS  ARE 

A  'PART'  AND  'PARTS'.  MOREOVER,  IN  HOST  CASES,  SUCH  AS  THIS 

A  ONE,  THE  KEYWORD  'STEP'  HAY  EE  OMITTED.  THUS  I  COULD  JUST 

A  AS  WELL  HAVE  SAID 

A  DISPLAY  STEP  3.3  TO  3.5 

A  OR  DISPLAY  3.3  TO  3.5 

A  NOW  I'LL  TRY  PART  3  AGAIN. 

N-6;PART  3 

720 

N-10;PAPT  3 
3628800 

N»-0;  PART  3; 

i 

ATTN  AT  3.2 

A  THAT  WENT  INTO  A  LOOP,  AND  I  HAD  TO  HIT  THE  'ATTN'  KEY  TO  GET 
A  OUT  OP  IT.  I  GUESS  THE  PROGRAM  IS  STILL  BUGGY. 

A  I'LL  THINK  AROUT  IT.  *  ♦  *  ♦  ♦ 

TYPE  FACT,N  ;  A  I  WONDER  WHAT  MY  VARIABLES  ARE  NOW? 

0 

-15 

A  OH,  I  SEE  —  PART  3  WON'T  WORK  FOR  ANY  VALUES  LESS  THAN  1. 

A  I'LL  FIX  IT  RY  ADDING  ANOTHER  STATEMENT. 

3.15:  IP  N  <  0  THEN  RETURN  FACT  ? 

N  *  0;  PART  3;  A  TRY  AGAIN. 
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A  THAT'S  MUCH  RITTER.  NOTE,  HOWEVER,  THAT  T  STILL  HAVEN'T  GOTTEN 
A  OUT  OF  NY  ORIGINAL  LOOP  (YOU  CAN  TELL  BY  THE  INDENTATION  -  7 
A  SPACES  INSTEAD  OF  4).  I  CAN  SAY  'GO',  WHICH  WILL  GO  ON  FROH 

A  THE  POINT  WHERE  I  HIT  'ATTN',  BUT  THAT  WON'T  DO  MUCH  GOOD. 

A  I'LL  TRY  IT  ANYWAY  TO  SHOW  YOU. 

GO 

; 

ATTN  AT  3.2 

A  YOU  SEE,  I'M  HACK  IN  THE  LOOP  AGAIN.  TO  GET  OUT,  I'LL  FORCE  AN 
A  END  TO  PART  3  BY  GOING  TO  STEP  3.15. 

GO  TO  3.15 

0 

A  FACT  STILL  HAS  THE  VALUE  OF  ZERO  BECAUSE  IT  WAS  ERRONEOUSLY 
A  MULTIPLIED  BY  THE  ZERO  VALUE  OF  N.  NOTE  ALSO  THAT  N  HAS  BEEN 
a  COUNTED  DOWN  AGAIN  BY  THE  LOOP. 

TYPE  N 
-5 

A  WE  CAN  HAVE  PART  3  ASK  US  POR  A  VALUE  OP  N  BY  USING  A  REQUEST 
a  STATEMENT. 

3.05:  ?N 

PART  3 

AT  3.05  N  -5;  a  I'LL  SE"  N  TO  5. 

120 

A  WE  CAN  INCLUDE  OUR  OWN  MESSAGE  IN  THE  REQUEST  BY  PUTTING  A  STRING 
A  RETWEEN  THE  QUESTION  HARK  AND  THE  VARIABLE  NAflE  (N). 

3.05:  ?  ' TYPE  N  FOR  N!'  N 

PART  3 

TYPE  N  FOR  N!  4 
24 

a  WE  CAN  USE  ANOTHER  PART  TO  CALL  PART  3  REPEATEDLY.  WE'LL  USE 
A  PART  25.  LET'S  USE  A  'NUMBER'  STATEMENT  TO  GENERATE  THE  STEP 
A  NUMBERS  AUTOMATICALLY. 

NUMBER  AS  25  BY  . 1 

25.1:  PART  3 

25.2:  ?  '  TYPE  1  TO  GO  ON,  0  TO  STOP  '  FLAG; 

25. 3:IF  "LAG  =  1  THEN  GO  TO  25.1; 

25.4: 

A  THE  AUTOMATIC  NUMBERING  IS  TURNED  OFF  BY  PRESSING  THE  RETURN  KEY 
A  IMMEDIATELY  AFTER  THE  STEP  NUMBER  IS  TYPED  TO  US. 

PApT  25;  A  NOW  CALL  OUR  PROGRAM. 

TYPE  N  FOR  N!  1 
1 

TYPE  1  TO  GO  ON,  0  TO  STOP  1 

TYPE  N  FOR  N!  6 
720 

TYPE  1  TO  GO  ON,  0  TO  STOP  1 

TYPE  H  POR  N!  0 
1 

TYP*  1  TO  GO  ON,  0  TO  STOP  1 

TYPE  N  FOR  N!  8 
40  320 
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TYPE  1  TO  GO  ON,  0  TO  STOP  1 

TYPE  N  FOR  N!  2.4 

i 

ATTN  AT  3.4 

A  OH,  OH  —  I'M  IN  A  LOOP  AGAIN.  I'LL  PLANT  A  'PAUSE'  STATEMENT 
A  INSIDE  IT  TO  SEE  WHAT  IS  HAPPENING. 

3.21:  PAUSE  ;  A  THIS  WILL  GIVE  ME  CONTROL  AFTER  STEP  3.2  IS  DONE. 
GO;  A  NOW  I'LL  GO  ON  WITH  THE  LOOP. 

PAUSE  AT  3.21 

TYPE  FACT,N;  A  I'LL  TAKE  A  LOOK  AT  THE  VARIABLES. 

15604.  44567 
-7.6 

GO  ;  A  IF  I  SAY  GO,  THE  PROGRAM  WILL  GO  THROUGH  THE  LOOP  AGAIN. 
PAUSE  AT  3.21 

TYPE  FACT,N 
-134198.  6628 
-8.6 

A  AS  YOU  CAN  SEE,  -JR  PROGRAM  DOESN'T  WORK  FOR  NON-INTEGERS. 

A  LET'S  FIX  IT  BY  TRUNCATING  N  WHEN  WE  ENTER  PART  3. 

3.06,  N  -  *N; 

a  NOW  TO  GET  RID  OF  THE  PAUSE  STATEMENT.  I'LL  USE  A  'DELETE' 

A  STATEMENT,  WHICH  WILL  ERASE  IT. 

DELETE  STEP  3.21 
GO;  A  LET'S  GO  ON. 

ERROR  GO 10  STEP  3.21  CHANGED;  GO  CANNOT  BE  USED 

A  OH, OH  —  I  FORGOT  THAT  I  CAN'T  CONTINUE  NORMALLY  AFTER  I  DELETE 
A  AN  ACTIVE  STEP.  THERE  ARE  A  NUMBER  OP  WAYS  TO  RECOVER  PROM 

A  THIS  SITUATION,  BUT  THE  SIMPLEST  IS  TO  START  OVER.  TO  DO 

A  THAT  WE  HAVE  TO  GET  OUT  OP  THE  CURRENT  PART  CALLS,  AND  THE 

A  EASIEST  WAY  IS  TO  EXECUTE  AN  'EXIT  ALL'  STATEMENT,  WHICH 
A  WILL  TAKE  US  BACK  TO  THE  ORIGINAL  USER  STATE.  REMEMBER  THAT 

A  CURRENTLY  WE  ARE  IN  PART  3,  WHICH  WAS  CALLED  PROM  PART  25, 

A  WHICH  WAS  CALLED  BY  ME,  SO  OUR  CONTROL  NESTING  DEPTH  IS  2 

A  (I  COULD  THUS  USE  TWO  SIMPLE  'EXIT'  STATEMENTS  INSTEAD  OP 

A  THE  'EXIT  ALL'). 

A  IP  WE  AREN'T  SURE  WHAT  OUR  CURRENT  CONTROL  STATE  IS,  WE  CAN 

A  FIND  OUT  BY  MEANS  OP  A  'DISPLAY  RETURN  STEPS'  STATEMENT, 

A  WHICH  WILL  LIST  THE  STEPS  CURRENTLY  BEING  EXECUTED.  LET'S 
A  SEE  WHAT  OUR  STATUS  IS  NOW. 

DISPLAY  RETURN  STEPS 

*** 

•i,  21 

25.  1 

*** 

A  THE  '***'  INDICATES  AN  IMMEDIATE  STEP,  WHICH  IMPLIES  THAT  WE, 

A  RATHER  THAN  A  SAVED  PROGRAM  STEP,  ARE  IN  THE  CONTROL  CHAIN. 

A  NOTE  THAT  WE  -"«*E  LIST  TWICE;  WE  ARE  IN  CONTROL  NOW 

A  (TOP  ENTRY)  "  PART  25,  WHICH  WOULD  NORMALLY 

A  RETURN  CON1' .. oL  Tu  o.  ■  ENTRY).  THF  'EXIT  ALL', 

A  HOWEVER,  ISN'T  NORMAL;  a.  c  THE  CONTROL  CHAIN  SO  THAT 

A  CONTROL  REVERTS  TO  THE  ORIGln...  ‘ ' J  STATE  WHERE  ONLY  A 
A  SINGLE  '♦*•'  WOULD  BE  DISPLAYED. 

A  THE  AMOUNT  OP  INDENTATION  WHICH  IS  DONE  BEFORE  LCC  GIVES  UP 
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A  CONTROL  TO  LET  US  TYPE  A  STATEMENT  DEPENDS  ON  THE  NUMBER  OF 

A  TIMES  WE  ARE  THEN  IN  THE  CONTROL  CHAIN,  WHICH  IS  THE  NUMBER 

a  OF  '*♦♦'  ENTRIES  IN  THE  'DISPLAY  RETURN'  LIST.  INITIALLY  WE 

A  APE  ON  USER  LEVEL  1  (IN  THE  CHAIN  ONCE)  AND  LCC  WILL  INDENT 

A  4  SPACES.  FOR  USER  LEVEL  2,  INDENTATION  WILL  BE  7,  FOR  LEVEL 

A  3  IT  WILL  BE  10,  FOR  LEVEL  4  IT  WRAPS  AROUND  TO  1.  THEFE- 

A  AFTER,  FOR  HIGHER  NESTING  LEVELS  THE  INDENTATION  WILL  FOLLOW 
A  THE  SEQUENCE 

a  4,  7,  10,  1,  4,  7,  10,  1,  ... 

A  LET'S  GO  ON. 

EXIT  ALL 

DISPLAY  PART  3;  A  LET'S  SEE  WHAT  PART  3  LOOKS  LIKE. 

3.05:  ?  'TYPE  N  FOR  N!'  N 

3.06:  N  -  IN; 

3.  1:  FACT  -  1; 

3.15:  IF  N  <  0  THEN  RETURN  »ACT  ; 

3.2:  FACT  -  FACT  *  N;  A  WE'LL  COMPUTE  N!  AND  PUT  IT  INTO  PACT. 

3.3:  IF  N  =  1  THEN  RETURN  FACT  ; 

3.4:  N  -  N  -  1  ; 

3.5:  GO  TO  3.2  ; 

PART  25  ;  A  LOOKS  FINE.  NOW  IT  SHOULD  WORK  FOR  ALL  REAL  VALUES  OF  Nv 
TYPE  N  FOR  N!  2.4 
2 

TYPE  1  TO  GO  ON,  0  TO  STOP  1 

TYPE  N  FOR  N!  -34.8 
1 

TYPE  1  TO  GO  ON,  0  TO  STOP  0 

A  THAT'S  ENOUGH  OF  THAT.  WE  CAN  NOW  SAVE  PART  3  ON  A  FILE  FOR  USE 
A  DURING  SOME  FUTURE  INTERACTION  SESSION.  I'LL  PUT  IT  ON  THE 
A  FILE  'FACT!'. 

SAVE  PART  3  AS  FILE  'FACT3' 

A  THAT  CREATED  A  NF.W  FILE  NAMED  'FACT3'  AND  STORED  THE  TEXT  FROM 
A  PART  3  ON  IT.  THE  TEXT  OF  PART  3  WILL  BE  RESTORED  IP  WE  LOAD 

A  ' F A CT 3 '  (USING  A  'LOAD'  STATEMENT)  DUPING  A  FUTURE  CONVERSATION 

A  WITH  LCC. 

OFF;  A  LET'S  LOG  OFF  AND  END  THIS  SESSION. 

ON  LCC  PROM  16:35:48  TO  17:17:12 
CPU  TIKE  USED:  00:00:06:86 


